
Il MAGAZINE DE LA MICRO PASSION 


APPLE 

MAC+ 

LEMEGA 


PREHSTORIQLÆ 

HILARE 
LEROI 




SUPER 

CONCOURS 















JVC va faire 
pour l’informatique 
ce qu’il fait déjà pour la vidéo. 


Les disquettes JVC sont vendues par 10 
dans une boîte de polypropylône. Cette 
boîte en plastique protège vos disquettes 
de toutes les agressions extérieures. 

En outre, leur design et leur solidité 
offrent des possibilités extrêmement 
pratiques pour le classement, 
le rangement et le transport de vos 
disquettes. 
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La pochette souple de la disquette 
lui apporte une protection 
supplémentaire. Il n’y a aucun 
risque d'endommager les 
disquettes JVC, même après de 
nombreuses manipulations. 



C’est promis 


Pour les disquettes, c'est déjà fait. 
Fort de sa supériorité technologique, 
JVC les a conçues en respectant les 
mêmes critères de fiabilité “hautes 
performances’’ que pour ses 
supports magnétiques vidéo VHS. 
Testées et retestées, les disquettes 
JVC sont garanties exemptes 
d’erreurs à 100%, même après 
20 millions de passages de tête par 
piste. 

Leur surface magnétique, 
microscopiquement uniforme, réduit 
l’usure et optimise la durée de vie de 


votre système de lecture/écriture. 
Vous gardez votre matériel 
informatique en parfait état de 
fonctionnement. 

Perfection JVC oblige, le design et 
la finition de la jaquette assurent une 
protection totale de votre disquette 
JVC. Vous avez toujours la maîtrise 
absolue de vos données 
informatiques, y compris dans des 
conditions climatiques défavorables. 
Sur une disquette JVC, votre 
information est en sécurité pour toute 
une vie: 


c’est ça, la fiabilité à 100% JVC. 

Dans la diversité comme dans la 
qualité, JVC tient ses promesses: ses 
disquettes existent dans les 3 tailles 
les plus répandues: 8”, 5”1/4 et 
3” 1/2. 

Et pour chaque taille, vous 
trouverez les spécifications les mieux 
adaptées au modèle de votre unité de 
disquettes. 

Utilisez les disquettes JVC, la 
première étape informatique de 
l’inventeur du VHS. 

Choses promises, choses dues. 



JAQUETTE 


ENCOCHE DE PROTECTION 
D'ENREGISTREMENT 


Il suffit d’appliquer sur cette 
encoche une pastille auto-collante 
fournie avec la disquette pour 
protéger intégralement les 
informations stockées contre toute 
erreur de manipulation. 


ITE DE TÊTE 
DE LECTURE/ 
ENREGISTREMENT 

Découpe à travers 
laquelle 
les têtes 
magnétiques 
du système lecture/ 
écriture écrivent et lisent 
les Informations sur la disquette. 


TROU CENTRAL ET BAGUE DE 
PROTECTION 


Le trou central, renforcé par une 
bague de protection en plastique, 
s'adapte au dispositif d'entraînement 
qui assure la rotation du disque 
sans risque d’erreurs. 


Fabriquée en polyvinyl, elle protège 
votre disquette contre tous les 
risques d’altération. Ne jamais 
essayer de sortir le disque de sa 
jaquette. 


GARNITURE SPÉCIALE 


Le disque en polyester pressé à 
revêtement spécial garantit votre 
disquette exempte d’erreurs à 
100% et protège le stockage de 
vos informations. 


DISQUE 


Une garniture en 
toile non tissée 
protège les deux 
faces de la surface 
magnétique du disque 
contre la poussière, et 
évite un encrassement trop 
rapide des têtes de lecture. 



HAUTEFEUILLE SA 
















Un vroi iournol : les 
informations mises à jour heure 
par heure, tous les résultats 
sportifs, lo météo, le bulletin 
d’enneigement, l’horoscope... 

Tout sur la vie de 
l’ontenne : les animateurs, 
les invités , /es jeux, les concerts, les hit-parades.. 
Lo messagerie... pour toute lo Fronce ou por région. 
Composez 36.15.91.77, topez RMC. 
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LECTEURS 
QUI ÊTES-VOUS? 

Aidez-nous à mieux vous con¬ 
naître, et à réaliser une revue 
qui réponde encore mieux à vos 
préoccupations. 

Répondez à notre questionnaire 
et gagnez (peut-être !) un ordi¬ 
nateur, une boîte de disquettes 
ou de cassettes. 


TOUT NEUF 



Mac Plus : Le méga-lot 24 

Cupertino ou l'anti-Dallas. Le 
début de la saga Macintosh. 
Apple veut les pros. 


ENQUÊTE 



Hilare, 20 

L’ère des robots sapiens 

Les robots ne seront jamais des 
hommes. Pas une raison pour 
rester des machines toutes bê¬ 
tes. Un peu de jugeotte dans les 
circuits ne leur fera pas de mat 
A nous non plus d'ailleurs. Ro¬ 
bot, lève-toi et marche... 


ATARI 
La contre- 
attaque 


17 


JEUX 

88 

Nouveau ! Huit pleines 

oages 

de jeux : un thème, les 

nou- 

veautés du mois et une 

sélec- 

tion des meilleurs softs ré 

cents. 

Le dessert au menu de to 

js les 

prochains numéros de 

Micro 

V.O. 


MACHINATIONS 

29 

Apple : Wozniak joue 


aux billes 

30 

Amstrad : Il fait l’artiste 

33 

Thomson : Des notes 


et quelques mots 

67 

Commodore : routines 

68 

Oric : La bombe Sedori 

z 70 

MSX :lwenttothemark6 

;t72 

Réseaux : Les tests 


accroche-cœurs 


sur minitel 

74 

Sinclair : Sœur Anne, 


ne vois-tu rien venir? 

76 

PEOPLE 

14 

INFOS 

16 

SAVOIR 


Minithèque : 


Drôle de crèche ! 

80 

Systèmes auteurs : 


maxi pédagogie, 


mini programmation 

82 

Télématique pour 


tous, le second plan 

84 


LOGICIELS 78 

Multi-gestion 

Football 

Multifile 


SUPER CONCOURS 
LOGICIELS 

Toujours 2 SONY Hit Bit 
HB 75 F avec drive, 

2 imprimantes 
EPSON LX 80 

et 4 moniteurs et interfaces 
Vidéo EUREKA MC 14 

à gagner dans notre grand 
concours. 

Envoyez vos programmes. 


CAHIER 


DU LOGICIEL 


Un super cahier (32 

pa- 

ges) pour un super con- 

cours. Les huit premiers 

gagnants et leurs 

pro- 

grammes. 


Fantasia (Spectrum) 

37 

Ecumeurs des mers 

40 

(MSX) 


Tante Agatha 

45 

(Atmos) 


Evasion (Tl) 

49 

Comptapple 

52 

(Apple Ile) 


Calibre 

55 

(TO 7, MO 5) 


Amstrologie 

57 1 

(Amstrad) 


FM Voicing 

60 

(Yamaha) 


Ergos 

61 

(C 64) 


COURRIER 

8 

LIVRES 

88 

Petites 


Annonces 

98 
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ORDINATEUR MSX 64 K 
+MONITEUR} / > 

2290F 

Système Réf. VG 8020/M avec moniteur monochrome. 
Version moniteur couleur Réf. 8020/C : 3490 F? 
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\\ 


moniteurs 
imprimante* 
«•nette» 

lecteur d* dicque 


i . ' CS* 


.. Phftïp§r«ont déjà au stan¬ 
dard du futur Ce sont les premiers maillons des 
systèmes interactifs grand public de demain. 

Déjà toute une gamme de périphériques 
et logiciels, MSX Dos, MS text, MS Base, logo : 
création, éducation, jeux; un environnement 
qui, chaque jour, se développera dans le cadre 
de la compatibilité. 


Caractéristiques techniques 

• Unité centrale VG 8020 
Standard MSX - 80 K Ram dont 16 K Vidéo. 
Clavier AZERTY. 16 couleurs 
2 ports-cartouches. 

Interfaces manettes et imprimante. 








s le bon systèm 


ORDINATEUR MSX 64 K 
+ MONITEUR# 

+LECTEUR DE DISQUETTES 


i Système Réf. VG 8020/MD avec moniteur monochrome. 
^ Version présentée moniteur couleur Réf. 8020/CD: 
^5990 F? 


• Moniteur monochrome vert 31cm. 
BM 7552. 

Anti-reflets - Son - Bande passante > 22 

• Moniteur couleur 36 cm GM 8521. ; 

Anti-reflets - Son - 390x285 points. 

• Lecteur de disquettes VY0010. 

3,5 pouces - Simple face. 

Double densité. 360 Ko Formaté. 


C’est déjà demain 


(*) Prix indicatif TTC au 2.01.86 











OURRIER 



Consommateurs en colère 


Cette histoire remonte à quatre mois, 
date à laquelle mon unité de disquet¬ 
tes, encore sous garantie, tomba en 
panne. Je courus chez mon vendeur, 
qui fit la marche à suivre auprès du 
service après-vente. Trois mois plus 
tard, je n'avais toujours pas de bulletin 
de santé de mon appareil. Inquiet de 
mon malade, mon vendeur et moi- 
même poursuivîmes nos recherches 
par contacts téléphoniques auprès du 
service après-vente. Celui-ci, semblant 
consciencieux et sincère, nous informa 
qu'il n’avait pas de malade à ce nom et 
fit une enquête au niveau des PTT crai¬ 
gnant un égarement. Quelques semai¬ 
nes plus tard, mon colis fut retrouvé, 
non pas auprès des services des PTT 
mais tout simplement dans les locaux 
du service après-vente. Probablement 
un oubli ! Satisfait de recevoir enfin 
des nouvelles de mon malade, j'eus 
l'agréable surprise d’apprendre qu’il 
n’était pas possible de le réparer. 
Faute de pièces détachées, mon ma¬ 
lade est déclaré incurable. Mon ordina¬ 
teur me manquant 'douloureusement, 
le vendeur et moi-même nous adres¬ 
sâmes directement à la firme importa¬ 
trice de mon appareil. La réponse fut 
brève : le service après- vente n'assure 
pas les garanties d’appareils achetés 
à une autre firme (celle qui importait 
mon appareil auparavant). Cependant, 
ils me proposent d'acheter un autre or¬ 
dinateur, au prix initial catalogue ! 
Jean-Marie Thouard 
17200 Royan 


Démêlés 

Si votre matériel « s’envoie en l'air », il 
faut l’envoyer à une société de mainte¬ 
nance pour réparation. Ladite société 
reçoit le matériel et envoie un devis (si 
vous êtes hors-garantie) avec le choix : 
ou vous payez et on répare, ou vous ne 
payez pas et vous vous débrouillez. Je 
vous laisse juge de l’étendue du choix. 
En avril 84, j’achète une interface et un 
lecteur de microdrive pour ma ma¬ 
chine. O joie ! Le changement est 
agréable. Quelques temps après, pre¬ 
miers problèmes : j’en conclus que 
mon matériel débloque et je l’envoie 
pour réparation. Réponse : matériel en 


panne, coût 450 F. Je paye et je reçois 
quelques temps plus tard mon matériel 
réparé. Pas pour longtemps. Il retombe 
en panne et je renvoie le tout pour ré¬ 
paration. Réponse : matériel en panne, 
payez 295 F. Je paye, on répare et on 
recommence. Matériel renvoyé tou¬ 
jours en panne. Conclusion : j’ai payé 
745 F pour un matériel qui ne marche 
toujours pas. Affaire à suivre. 
Jean-Hugues Belpois 
25000 Besançon 

Amours tumultueuses 

Vous serait-il possible de publier le ré¬ 
cit de mes amours tumultueuses avec 
un micro ? Jugez plutôt... 6 février : 
achat du micro. 9 février : en panne 
(c’est-à-dire 4 jours après !). 15 fé¬ 
vrier : envoi pour réparation. 20 mai : 
machine réparée (3 mois après). 7 
juin : même panne (2 semaines après). 
10 juin : envoi pour réparation. 2 août : 
machine réparée (deux mois après). 25 
octobre : même panne après une dou¬ 
zaine d’utilisations seulement. Ques¬ 
tions : les fabricants de micro vendent- 
ils de la quincaillerie ? Les services 
après-vente sont- ils des bricolo-quin- 
caillers ? Question subsidiaire : avez- 
vous une idée du coût des interven¬ 



tions téléphoniques que j’ai dû faire à 
partir de ma province durant toute 
cette période ? 

Pierre Montauzou 
54710 Fleville 

Nous avons volontairement supprimé 
les noms des firmes mentionnées par 
nos lecteurs. Les problèmes rencon¬ 
trés ne sont pas spécifiques à telle ou 
telle firme. Ils se retrouvent un peu par¬ 
tout. C'est le système après-vente qui 
est mal adapté aux consommateurs. Il 
est déjà compliqué dans la vie quoti¬ 
dienne de composer avec les tracas¬ 
series admnistratives... C'est à vous, 
consommateurs, d’exiger des firmes 
qu’elles vous respectent. Assurez- 
vous du suivi de votre matériel avant 


de vous engager dans un achat, quitte 
à payer un peu plus cher. Contactez 
les associations de consommateurs, 
c’est certainement le meilleur moyen 
pour vous défendre (de «50 millions 
de consommateurs » à « Que choisir » 
etc.). Quant à nous, nous avons décidé 
de consacrer un peu plus de place à 
ce type de problèmes. Dans le mesure 
du possible, nous contacterons les fir¬ 
mes pour leur soumettre vos problè¬ 
mes spécifiques et nous publierons 
les réponses... des deux côtés. N’hési¬ 
tez pas non plus à nous soumettre vos 
démarches positives, elles aussi nous 
intéressent. 


Atari sort du brouillard 

Vous avez été nombreux à nous écrire 
pour nous demander des nouvelles 
d’Atari. Votre curiosité sera satisfaite 
dès le mois prochain. Une rubrique 
Atari dans « Machinations » répondra 
aux questions les plus diverses : nou¬ 
veautés, trucs et astuces de program¬ 
mation, livres et revues dédiés au ma¬ 
tériel de la marque. Quant à ta paru¬ 
tion de programmes pour Atari... le 
Cahier du logiciel attend les vôtres. 


Rectifiez les réseaux 

Ah ! J’adore les rectificatifs. Au 


moins, ça prouve que nous som¬ 
mes lus. Donc, concernant mon ar¬ 
ticle sur Calvados dans Micro V.O. 


n°4, page 29 il faut lire « Lionel » 
Lumbroso au lieu de « Christo¬ 
phe ». Notez que ce prénom ne lui 
allait pas si mal. 

Page 30, concernant les tarifs : les 
170 F d’abonnement mensuel sont 
autant d’heures payées d'avance. 
Autrement dit, il s’agit d’un temps 
de connexion minimum. Au-delà, 
vous paierez les heures au tarif an¬ 
noncé. A propos de Calvados, 
l'annuaire est effectivement amé¬ 


lioré depuis un mois. D’autre part, 
Calva a ouvert un service Magazi¬ 
nes. Pour plus de renseignements, 
écrivez à Calvados, BP 2107, 
75327 Paris Cedex 07. 

Quant aux numéros pour se bran¬ 
cher, nous vous les redonnons 
avec leurs indicatifs : 


MESTEL: 

ADN : 

ELUS : 

KAEZO : 

CIDER : 
COSMOS : 
COMPUTEL : 
PHOENIX : 

POM POM POM : 
UPC TELL : 
SYNAPSE : 
AMISERV : 


16.1.45.80.50.64 

16.1.48.94.02.50 

16.1.42.04.33.74 

16.1.39.62.20.01 

16.1.38.90.23.13 

16.1.42.83.86.00 

16.1.43.97.33.33 

16.1.45.55.02.27 

16.1.30.52.96.40 

16.44.58.90.74 

16.1.48.42.20.57 

16.1.43.27.82.89 


Pépé Louis 
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HACKER 

Vous avez trébuché sur 
quelque chose d'inconnu 
dans votre système 
ordinateur. Que se passe- 
t-il? 

"LOGON PLEASE ." Un 
mot apparaît sur votre 
écran. Que faites-vous 
maintenant ? 

Vous êtes un "craqueur". 

Disponible pour 
COMMODORE 64. 




Cassette. 

Bientôt sur SINCLAIR 
Spectrum, AMSTRAD, 
APPLE, ATARI. 
Cassette et disquette. 


Sur COMMODORE 64. 
Cassette et disquette. 
ATARI. 

Cassette et disquette. 
SINCLAIR, AMSTRAD. 
Cassette. 


KORONIS RIFT 

Lucas Film a mis en 
image, avec un superbe 
graphisme, cette 
prodigieuse chasse aux 
trésors. Découvrez le 
“Koronis Rift ” 
légendaire. 


HACKER 

You've found your way in 
But îs there a wuguii'? 


THE LITTLE 
COMPUTER 
PEOPLE RESEARCH 
PROJECT 

Dessiné par David Crâne. 
Y a-t-il quelqu 'un qui vit 
dans votre ordinateur ? 
Oui, il joue du piano, 
regarde la télévision, lit 
son journal, etc. Faites 
sa connaissance. 



RESCUEON b!Ul : -T THE GREAT 

FRA CTAL US - Lucas AMERICAN CROSS 

film ujCMRiMWMts COUNTRYROAD 




O 


O 


C'.s? 


RACE 

Un challenge automobile 
d'un niveau jamais 
atteint. Consultez la 
carte détaillée des Etats- 
Unis. Choisissez votre 
parcours. Vous devez 
tenii compte du terrain, 
de la distance et des 
récentes prévisions 
météorologiques... et 
pensez vite !!! 

Pour COMMODORE 64. 
Cassette et disquette. 
Bientôt pour 
AMSTRAD, APPLE, 
ATTARIXE/XEL. 


BALLBLAZER- 

Lucas film 

Un échiquier hallucinant 
sert de terrain de jeu à 
deux opposants qui se 
propulsent à des vitesses 
"supersoniques " à bord 
d’un hydroglisseur afin 
de marquer te plus de 
points entre les poteaux 
qui bordent le terrain. 

Ce “football"futuriste 
est magnifiquement 
dessiné en trois 
dimensions et permet à 
deux joueurs de 
s'affronter 
simultanément. 

Compatible sur 
COMMODORE 64. 
Cassette et disquette. 
Bientôt sur SINCLAIR 
Spectrum, AMSTRAD, 
APPLE, ATARI. 

Cassette et disquette. 


Un pilotage difficile. 
Montagnes déchiquetées, 
gouffres vertigineux, la 
vie sur la planète 
Fractaius est un enfer. 
Elément brillant de 
l'escadrille de sauvetage, 
sauvez les pilotes dont le 
vaisseau s est abattu sur 
cette planète. 

“Les effets de relief en 
trois dimensions sont à 
couper le souffle". 

(TILT- Juillet S5.) 


Sur COMMODORE 64. 
Cassette et disquette. 
Sur ATARI XEL. 
Cassette et disquette. 
Bientôt sur AMSTRAD, 
SINCLAIR Spectrum, 
APPLE 


ACTIVISION 

HOME COMPUTER SOFTWARE 


Pour COMMODORE 64. 
Cassette et disquette. 


RCA Distributeur : 
CONTACT: 69.34.20.50. 







































256 Ko, un lecteur de disquette, 

une imprimante et un traitement de texte 

en français pour 6990 F : 

c’est la nouvelle révolution Amstrad. 

Ceux qui n’ont pas attendu vont pleurer de dépit, 
les autres de joie. 


ÉCRIRE. Le programme Locoscript* a été conçu 
pour exploiter la mémoire phénoménale du PCW 
8256 et les extraordinaires possibilités de son 
imprimante (plus de 100 types d’écriture, alpha¬ 
bet grec, italique, souligné, gras, exposants, 
indices, double largeur, etc.). A l'écran, vous 
travaillez sur 32 lignes de 
90 caractères à l’aide de menus 
déroulants en français et des 
fonctions couper-coller. Ses 
performances et sa simplicité 
d’emploi ont été saluées par 
toute la presse: en une heure 
vous savez l’utiliser, en une journée vous êtes un 
expert. 

Lettres, factures, ou romans: le PCW8256 accé¬ 
lère la création de tous les documents. Pendant 
l'impression, la machine est disponible pour un 
autre travail. 


Locoscript traitement de texte en français (livré avec la machine) 





































Traitement de texte Amstrad : 


à ce prix là, 

certains vont verser des larmes 



CALCULER. Le PCW 8256 est aussi un puissant 
micro-ordinateur. Sa vaste 
mémoire (RAM 256 Ko, dis¬ 
quette 170 Ko par face et RAM- 
disque 112 Ko), ses capacités 
graphiques (système GSX) et 
son système d'exploitation 
(CP/M+) lui permettent d'uti¬ 
liser les meilleurs logiciels 
professionnels, comme Multi- 
plan* ou DBase II*, proposés 
au quart de leur prix habituel ! 



PROGRAMMER. Pour ceux qui veulent pro¬ 
grammer, le PCW 8256 est livré avec le puissant 
Basic Mallard* (séquentiel indexé !) et Dr Logo* 
et accompagné d’une documentation complète 
en français. 

• Multlplan tableur professionnel (en option: 498F tic) 

* DBAse II base de données professionnelle (en option . 790 F tic) 


Pour tout savoir sur le PCW 8256 et mettre rapi¬ 
dement du mordant dans votre travail et sur cha¬ 
que bureau de votre entreprise, retournez-nous 
dès aujourd'hui le coupon ci-contre ou courez 
chez le distributeur Amstrad le plus proche. 

*CP/M + DK Logo et GSX marques déposées de Digital Research Inc 
D Base II: marque déposée de AshtonTate Multiplan marque déposée 
de Microsoft. 


|m 


Merci de m’envoyer une documentation 
complète sur le PCW 8256 


nom: 


n 

10 I 

o I 
^ I 

5 


adresse: 


AMSTRAD 


Renvoyez ce coupon à 
Amstrad France, BP 12 
92312 Sèvres Cedex 
Ligne consommateurs: 
| 46.26.08.83 



LE MORDANT INFORMATIQUE. 


Mendès-France M C 
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Au paradis rien ne manque. 

AMSTRAD a tout donné à ses deux 
ordinateurs vedettes : 
une unité centrale puissante et compacte, 
un clavier professionnel, un lecteur 
rapide intégré, un écran graphique 
et un prix... AMSTRAD. 

Vous branchez, ça marche. Des centaines 
de programmes sont à votre disposition. 


Pour jouer, pour étudier, pour travailler 
ou pour programmer. 

Plus de 500000 AMSTRAD ont été vendus 
dans le monde en tout juste un an. 

C’est le plus grand succès dans toute 
l’histoire de la micro. 

Vous aussi, entrez librement dans le 
paradis informatique AMSTRAD, et 
laissez la télé familiale aux fans de Dallas. 

















PARADIS DES MORDUS 






★ ICPC 464 (64 Ko, lecteui cassette) ** 'CPC 6128 ( 128 Ko, lecteur disquette. CP/M+) 

- avec moniteur monochrome : 2690F ttc - avec moniteur monochrome : 4490 F ttc 

- avec moniteur couleur : 3990F ttc — avec moniteur couleur : 5990F ttc. 


I 


Merci de m'envoyer une documentation 
complète sur le CPC 464 et le CPC 6128 

nom:_ 

adresse :_ 


Renvoyez ce coupon à Amstrad France, 

BP 12 92312 Sèvres cedex 

Ligne consommateurs : 46.26,08.83 



LE MORDANT INFORMATIQUE. 


Mendès-France M C 

































À la base des prédictions de 
Nadir : la carte du ciel 
(au centre) et le calcul précis 
des paramètres cosmiques. 


L’AVIS 

DES PLANÈTES 

Spécialisé dans l'« astro-bu- 
siness», Nadir cherche 
dans les étoiles les répon¬ 
ses aux multiples questions 
qui lui sont posées. Ni 
voyant, ni charlatan, Nadir 
est un astrologue averti. Cet 
égyptien de cinquante-cinq 
ans s’est reconverti dans le 





langage des astres après 
avoir effectué un court pas¬ 
sage dans les affaires en 
tant que consultant écono¬ 
mique. « Je suis venu à l’as¬ 
trologie par mon deuxième 
mariage», raconte-t-il. C’est 
en 1980, que Nadir choisit le 
pseudonyme qui le rendra 
célèbre dans les sphères 
des astrophiles. C'est aussi 
à ce moment-là qu'il décide 
que l’ordinateur peut l’aider 
à mettre en mémoire les 
multiples données qui se¬ 
ront utiles à ses études. 
Grâce aux programmes qu’il 
a mis au point avec l'aide 
ponctuelle d’un program¬ 
meur, il établit les thèmes 
astraux sur ordinateur Hita¬ 
chi en couleurs, carte du ciel 
à l'appui. De l’astro-flash ni 
plus ni moins? Certaine¬ 
ment pas. Nadir entre lui- 
même les données spécifi¬ 
ques à chaque individu dans 
sa machine. Ce qui en res¬ 
sert, c’est votre thème astral 
complet, mais aussi en clair 
vos points faibles et forts, 
les principaux aspects de 
votre personnalité, etc. Et 
puis Nadir prend le temps 
d’analyser ce document 
avec vous, il le commente 
lors d'une véritable consul¬ 
tation. C’est une étude indi¬ 
viduelle informatisée. La 
spécialité de Nadir : la CIA ! 
Plus précisément la Carte 
d’identité Astrogram. Pour¬ 
quoi CIA? «Parce que je 
sais tout, comme la CIA » ré¬ 
pond Nadir avec un cha¬ 
risme tel qu’on est à deux 
doigts de le croire à 100%. 
Pour 2 800 F, et avec le con¬ 
cours de l’ordinateur, Nadir 
ne vous délivre pas du mal 
mais délivre le roman de vo¬ 
tre vie, jour après jour, inter¬ 
prété en fonction de vos 
astres de naissance. Enfin, 
Nadir se sert de sa con¬ 
naissance du milieu des af¬ 
faires pour se faire le con¬ 
seiller en « astro-business» 
de nombreux hommes d’af¬ 
faires : à quel moment effec¬ 
tuer rachats, fusions, ven¬ 
tes? Quel est le meilleur 
moment pour signer un con¬ 
trat? etc. Si les hommes 
d’affaires ne trouvent pas 
forcément la réponse dans 
les astres, cela peut néan¬ 
moins les aider à ne pas ti¬ 
rer des plans sur la comète. 


Cette comète dont on parle 
tant et qui, d’après Nadir, est 
la source de bien des maux. 
Astrogram : 15, rue du Gre¬ 
nier Saint-Lazare, 75003 Pa¬ 
ris. Tél : (1)48.87.03.63. 

CHINE 

MACHINE 

« La femme qui ne suppor¬ 
tait pas les ordinateurs... », 
ce n'est certainement pas 
Chine Lanzmann qui ma¬ 
chine sur son Macintosh de¬ 
puis deux ans et qui signe le 



Chine, 19 ans, a écrit un jeu 
pour les femmes. Enfin ! Elle se 
passionne maintenant pour les 
réseaux. 

scénario de ce roman inter¬ 
actif sur ordinateur en com¬ 
pagnie de Jean-Louis Le 
Breton. Distribué par Froggy 
Software à moins de 200 F, 
ce programme fonctionne 
sur les Apple Ile et Ile des 
maris ! Chine est connue 
pour avoir publié l’année 
dernière un roman intitulé 
L'Année câline aux éditions 
Pauvert/Carrère. « Mon 
deuxième roman, intitulé En¬ 
lève-moi ça tout de suite ! ! ! 
paraîtra dans quelques 
mois. En attendant, je me 
passionne pour les réseaux 
et j’ai écrit le scénario de La 
Femme qui ne supportait 
pas les ordinateurs. Il s'agit 
d'une conversation entre la 
femme qui joue et l'ordina¬ 
teur. Une conversation qui 
peut rapidement devenir in¬ 
time, puisque l'amour s'en 
mêle et s'emmêle dans les 
fils... Une histoire passion¬ 
nante, pleine d’humour et 
qui incitera certainement 
plus d’une femme à se met¬ 
tre au clavier. 




















PERIPHERIQUES AMSTRAD 

LE PARADIS DES MORDUS 







Lecteur de disquette 

(3 pouces, 170 Ko par face) : 

— DDI-1 avec interface pour CPC 464 ou 
CPC 664: 1990 F ttc 

— FD-1 second lecteur pour 
CPC 464, 664 et 6128: 
1590 F ttc 


Interface RS 232 C 

L'accès au monde des télécommunications 
(Minitel, serveur, etc.). 

Pour CPC 464, CPC 664 et CPC 6128: 590 F ttc 


Imprimante DMP 2000 

Imprimante qualité courrier pour CPC 464, 
664 et 6128. 90 polices, 20 à 100 caractères/ 
seconde, alimentation feuille à feuille ou en 
continu: 2290F ttc 


Joystick 

Pour piloter tous vos jeux : 149 F ttc 


Synthétiseur vocal 

Faites parler votre CPC 464 ou 664: 390 F ttc 


Crayon optique 

Le dessin direct pour tous les modèles avec 
moniteur couleur: 290F ttc avec logiciel 
graphique 


Adaptateur Péritel 

Pour profiter des couleurs de votre téléviseur 
avec les versions monochromes. 

MP 1 pour CPC 464: 390 F ttc 
MP 2 pour CPC 664 et 6128: 490 F ttc 


Multiplan. le tableur 
bien connu de Microsoft, disponible 
pour le PCW 8256 et le CPC 6128 
à un prix Amstrad 498 F TTC 


D Base II, le système 
de base de données relationnelle très 
performant qui vous permettra de 
construire tous vos fichiers pour 
790 F TTC. 


Souris AMSTRAD 


Le dessin souris et la 
gestion rapide du 
curseur pour 
CPC 464, 664 
et 6128:690 F 


AMSTRAD 

LE MORDANT INFORMATIQUE. 


V 




























HOURRAH! 

ILS «COHABITS » 

On ne se téléphone plus 
chez les grands, on se 
passe un coup de sonde via 
le satellite. C’est en tout cas 
le dernier moyen utilisé par 
Gorbatchev et Reagan pour 
se faire des amabilités au' 
1er janvier de l’année du Ti¬ 
gre. Après eux, ce sont deux 
cents citoyens américains et 
deux cents citoyens soviéti¬ 
ques qui ont pu converser 
trois heures durant, exposer 
leurs points de vue, affirmer 
leurs opinions, parler de leur 
vie de tous les jours, tou¬ 
jours grâce au satellite. 
Cette émission sera retrans¬ 
mise sur les télévisions des 
deux pays. L’idiot de l’Amé¬ 
rique, j’ai nommé Rambo en 
personne, s’apercevra peut- 
être que les Russes aussi 
aiment leurs enfants et ne se 
baladent pas tous avec des 
micros cachés dans les 
oreilles... 

TANDON DANS 
LA COURSE 

Tandon arrive en force sur le 
marché des compatibles 
IBM en proposant une 
gamme de six modèles re¬ 
groupés en six catégories : 
le Tandon PC qui offre 256 
Ko de mémoire centrale, 
deux lecteurs de disque 
souple de 360 Ko (environ 
150 00 F), les Tandon PCX 
10 et PCX 20 qui compren¬ 


nent un disque dur de 10 ou 
20 Mo, un lecteur de disque 
souple de 360 Ko et une mé¬ 
moire centrale de 256 Ko ( 
environ 18 495 F pour le 10 
Mo et 20 495F pour le 20 
Mo), les Tandon PCA, PCA 
20 et PCA 30 qui compren¬ 
nent un lecteur de disque 
souple de 1,2 Mo et une mé¬ 
moire centrale de 512 Ko. Ils 
disposent respectivement 
d’une mémoire de masse de 
20 ou 30 Mo (les prix sont de 
27 995 F pour le PCA et de 
31 995 F pour le 20 Mo. Rap¬ 
pelons que Chuck Peddle, 
le président de Tandon 
Computer, est un pionnier 
de la micro-informatique, 
père du PET Commodore et 
du Vie 20 et créateur du pre¬ 
mier micro-ordinateur : le 16 
bits Sirius 1 de Victor. 

IMAGINA 

Elles arrivent de tous les 
coins du monde et se faufi¬ 
lent sur tous les écrans ca¬ 
thodiques. Bref, les images 
de synthèse déferlent pour 
notre plus grand plaisir. Ci¬ 
néma, télévision, publicité, 
elles ont même leurs mani¬ 
festations : Beaubourg, Pari- 
graph, centre national des 
Arts Plastiques... 

Au Forum Imagina de 
Monte-Carlo, qui s’est tenu 
début février, des « nou¬ 
veaux imagistes » étaient 
venus du monde entier pour 
confronter leurs réalisations. 
Les télévisions, Thomson, la 


Sogitec... Ils étaient (pres¬ 
que) tous là, sans oublier 
l’INA, organisatrice avec Bull 
de ce forum. L’occasion 
pour les Américains et les 
Japonais de rafler les prix 
Pixels, pour tous d’admirer 
de somptueuses images et 
pour quelques-uns d’annon¬ 
cer leur projet. FR3 se pré¬ 
pare à diffuser une série de 
dessins numériques ani¬ 
més, réalisée par Jean 
Roussel. Celui qui commit 
autrefois les Shadocks réci¬ 
dive, toujours avec la com¬ 
plicité de Calude Piéplu, 


pour cette série sur «l’Infor- 
matic », où l’on découvrira 
les Matics, les Dogmatics 
(chien matic) et les Flegma- 
tics (Matics mous). 

Par ailleurs, l’I.N.A. et A2 
proposent les 3, 10, 17 et 
24 mars vers 22 h 15, une 
série d’émissions sur les 
images de synthèse, « Nom¬ 
bre et Lumière ». 

Enfin, L'Unique, un film de 
Jérôme Diamant Berger était 
présenté en avant-première. 
Dans ce film, un bon nombre 
d’effets spéciaux font appel 
aux images de synthèse. 

Une palette de 
chiffres a permis de 
réaliser ces images. 

La pub « Robot » de 
Georges Kular pour 
Restore. 

Simulation architectu¬ 
rale : « La Maison qui 
grandit » de Renato 
pour la Sogitec. 

« L'échiquier » de 
Hubert de Maximy 
pour Thomson-DSE. 
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Atari France repart. Avec 
une gamme très aiguisée 
qui occupe tous les cré¬ 
neaux du marché français 
de l'ordinateur personnel, 
des projets dans le do¬ 
maine professionnel et un 
nouveau président à la per¬ 
sonnalité incontestable, 
qui a accordé à Micro V.O, 
sa première interview de¬ 
puis sa prise de fonction. 

L a nouvelle gamme Atari 
pour la France s’établit 

ainsi : 

- un ensemble 130 XE, 128 k 
de RAM, avec lecteur de dis¬ 
quettes 1050, proposé à 
moins de 3000 F. 

- un 520 STF (notez le « F »), 
512 k de RAM, avec un flop- 
py disk intégré de 512 k (non 
formatés) et un cable péritel. 
Prix public : 5990 F ttc. 

- Un 1040 STFM, 1 Mo de 
RAM, avec disquette inté¬ 
grée de 1 Mo (non formaté) 
et un moniteur monochrome 
haute définition. Prix de l’en¬ 
semble : 9990 F ttc. 

Le vaisseau Atari France re¬ 
prend la mer. Après avoir 
observé la météo et donné 
un sérieux coup de brosse à 
sa coque. (Appelons ça une 
étude marketing et une mo¬ 
dification de structure). Avec, 
à la barre, un capitaine de 
fameuse réputation, et der¬ 
rière les sabords, trois piè¬ 
ces d'artillerie aux calibres 
bien ajustés. 

Le petit canon, le 130 XE, on 
connait. La nouveauté réside 
dans son association avec 
le lecteur de disquettes 
1050. Sa précision de tir 
(2900 F et quelques pous¬ 
sières ttc) semble viser la 
poupe d’un corsaire (j’ai dis 
anglais ?) qui court devant. 
Seconde pièce, le 520 STF. 
« F » comme floppy explique 
Elie Kénan. « F » comme 
France, sommes-nous ten¬ 
tés d'ajouter, tant cette ma¬ 



Elie Kenan, le nouveau 
président d'Atari France n'est 
pas le premier venu. 
Commodore lui doit une 
bonne part de son succès 
en France. 

Il retrouve aujourd'hui Jack 
Tramiel chez Atari. 

chine colle au marché fran¬ 
çais. «Un marché, précise 
Elie Kenan, qui réclame du 
familial haut de gamme à 
5/6000 F. Nous avons pu 
composer une offre adaptée 
et pour tout dire exclusive¬ 
ment réservée à la France. 
Le cable Péritel permet en 
effet de connecter la ma¬ 
chine à tous les téléviseurs 
couleurs dotés d'une sortie 
Péritel/RVB ». Autrement dit 
tous les téléviseurs vendus 
depuis 81, obligatoirement 
équipés de cette possibilité 
de connexion. « De ce fait, 
poursuit Elie Kenan, la 
France représente et de loin 
le parc le plus important de 
Peritel/RVB, système qui 
permet de restituer toutes 
les qualités graphiques du 
520 ST. Ce n'est pas le cas 
avec les téléviseurs Pal alle¬ 
mands ou anglais. Nous 
permettons ainsi à des bud¬ 
gets familiaux d'accéder à 
un micro 16 bits. » En faisant 
l’économie d’un moniteur 
noir et blanc, avantageuse¬ 
ment remplacé par une TV 
couleur. Le moniteur mono¬ 
chrome est par contre pré¬ 
sent dans la configuration 
1040 STFM, troisième ca¬ 


non, dirigé lui, vers une cible 
« personnel- profession¬ 
nel ». Il s’agit en quelque 
sorte d'un 520 ST gonflé à 1 
Mo de RAM, avec lecteur in¬ 
tégré de 1 Mo également 
(non formaté). Une véritable 
chapelle pour les exclus de 
la religion Macintosh, instal¬ 
lée quatre étages et autant 
de briques au-dessus ! 

M V.O : A quelle date ces 
machines seront-elles dis¬ 
ponibles ? 

Elie Kenan Dés le début du 
mois de Mars. 

Et en quelle quantité ? 

Celle qui sera demandée 
par le marché 

On a souvent reproché aux 
premiers ST de mal fonc¬ 
tionner... 

Quelques 7000 ST ont été 
vendus à ta fin de Tannée en 
Allemagne. On ne vend pas 
une telle quantité de machi¬ 
nes, si elles ne fonctionnent 
pas. L'Allemagne possède 
maintenant un parc de 20 
000 520 ST. Autant que les 
Etats-Unis. Les produits 
destinés à notre marché 
étant montés dans la même 
usine que ceux destinés à 
l'Allemagne, je n'ai aucune 
inquiétude à ce sujet. 

Ce qui est incontestable 
par contre, c’est que les 
softs ont cruellement fait 
défaut au 520 ST... 

Les softs, c'est un vrai pro¬ 
blème auquel tous les 
grands constucteurs ont été 
confrontés à un moment ou 
à un autre. Pour nous, ce 
problème se situe à deux ni¬ 
veaux les développeurs 
ont marqué un certain scep¬ 


ticisme lorsque la machine 
leur a été présentée. Tout a 
vraiment démarré en Octo¬ 
bre au Comdex ou Atari à 
fait une superbe prestation. 
Une bonne centaines de dé¬ 
veloppeurs s'y sont alors 
mis. Et une bonne vingtaine 
d'autres ont pris la décision 
de créer des logiciels pour 
Atari au CES de Las Vegas, 
début janvier. Nous nous 
employons pour notre part à 
fournir des logiciels franci¬ 
sés. Ce sera fait dans un dé¬ 
lai d’un mois environ. 

Mais dés le début de la 
commercialisation des ma¬ 
chines, un certain nombre 
de softs seront disponibles : 
un traitement de texte, un 
gestionnaire de fichiers... 
Avec le 1040, vous vous po¬ 
sitionnez sur un marché 
semi-professionnel ? 

La volonté d’Atari est d'être 
présent sur le marché de 
l'ordinateur personnel- fami¬ 
lial, personnel- profession¬ 
nel et professionnel tout 
court. Mais il est encore un 
peu tôt pour en parler. 

Comme nous n’avons pas 
les oreilles sous le bonnet et 
les yeux dans notre poche, 
vous nous permettrez, mon¬ 
sieur le Président d’anticiper 
deux questions : qu'en est-il 
exactement des rumeurs 
concernant une utlisation du 
520 ST comme terminal 
Unix ? D’autre part, vers quel 
système d’exploitation vous 
tournerez-vous si vos ma¬ 
chines s'installaient effecti¬ 
vement dans un univers 
professionnel ? 


















LE FORUM 
DE LA 

COHABITATION 


tain «tassement» dans les 
installations d'ordinateurs 
personnels. Le marché est 
donc stabilisé et l'ordinateur 
personnel se trouve dans 
une nouvelle situation, à la 
limite entre la micro-informa¬ 
tique et la mini avec l’AT. 
IBM semble orienter l’utilisa¬ 
tion des micro-ordinateurs 
vers des systèmes mono¬ 
postes ou en réseau après 
l'annonce du réseau de PC 
(PC network). 


Le 3ème Forum IBM/PC et 
compatibles s’est tenu à Pa¬ 
ris du 11 au 14 février. Plus 
de 300 sociétés, spéciali¬ 
sées autour de l’IBM, de ses 
compatibles et de leur envi¬ 
ronnement (logiciels, péri¬ 
phériques, services...). Outre 
Olivetti, Compaq, Philips, 
Texas, Victor, Zenith, le Fo- 


DMC 100 : 

LA « WASP» 

Silencieuse et bon marché 
(entre 3 000 et 3 500 F), l’im¬ 
primante DM 100 d’Olivetti à 
aiguilles imprime 120 carac¬ 
tères par seconde en listing 
et 25 caractères par se¬ 
conde en qualité courrier. 
Outre sa compatibilité d'hu¬ 
meur quasi-évidente avec la 
gamme Olivetti, elle est 
compatible avec la famille 
IBM PC, Apple Ile, Macin¬ 
tosh, etc. Elle existe en ver¬ 
sion vidéotex. Leader euro¬ 
péen des imprimantes, Oli¬ 
vetti couvre désormais toute 
la gamme des imprimantes : 
environ vingt modèles utili¬ 
sant toutes les technologies 
pour être présents sur tous 
les fronts ! Imprimantes à ai¬ 
guilles, à marguerite, à jet 
d'encre, thermiques, impri¬ 
mantes page... Ces diverses 


technologies permettent les 
applications les plus variées 
à la fois en informatique pro¬ 
fessionnelle et personnelle. 


PIGEON 

VOLE 

La SPA américaine protège 
de drôles d’animaux : les 
programmeurs ! SPA vou¬ 
lant dire littéralement « Soft¬ 
ware Publishers Associa¬ 
tion» (SPA : Suite 1200, 
1111 19th Street, NW, Wash¬ 
ington DC, 20036) c'est- 
à-dire Association des édi¬ 
teurs de logiciels en fran¬ 
çais. Dans un communiqué 
publié très largement dans 


la presse spécialisée améri¬ 
caine, la SPA fait savoir que 
« la copie sauvage de logi¬ 
ciels est un crime et que les 



FORUM 


rum a acceuilli cette année 
des nouveaux venus : Hew¬ 
lett-Packard, Apricot, Bull 
Micral, Epson, Leanord, 
Wang, Canon, Commodore, 
Fujistsu et ITT Data Systems. 
Les constructeurs ont tout 
interet à adhérer au « parti» 
et à jouer la carte « PC com¬ 
patible» ! Car entre 1984 et 
1985, on a observé un cer- 




pirates sont des criminels 
comme les autres passibles 
de jugements, de condam¬ 
nations et même de prison ». 
Dernier avertissement : « si 
vous connaissez des gens 
qui font des copies illégales 
de programmes existants, 
dites-leur qu'ils sont hors- 
la-loi.» Ces méthodes sont 
tout de même plus nobles 
que la délation. 



Salon de la Communicati- 

que : grand rendez-vous in¬ 
formatique dans le Langue- 
doc-Roussillon, le salon se 
tiendra au Parc des Exposi¬ 
tions de Montpellier-Fréjor- 
gues, du 5 au 8 mars 1986. 
Au programme : rencontres, 
échanges, présentations de 
produits et de services nou¬ 
veaux, etc. 

Securicom : Le 47ème Con¬ 
grès mondial de la protec¬ 
tion et de la sécurité infor¬ 
matique et des communica¬ 
tions se tiendra au Grand 
Hôtel Intercontinental, à Pa¬ 
ris, du 4 au 6 mars. Rensei¬ 
gnements : (1 ) 47.20.21.22. 
Printemps informatique Le 
Printemps Informatique se 
tiendra du 25 au 28 mars au 
Palais des Congrès à Paris. 
Tél : (1)47.42.20.21. 

Le salon des utilisateurs 
professionnels Electron se 
tiendra à Bordeaux (Parc 
des expositions) les 18, 19 
et 20 mars. L’accent sera 
mis d’une part sur l’automa¬ 
tisme et les robots en agri¬ 
culture, d’autre part sur les 
images électroniques et 
leurs applications dans l’in¬ 
dustrie, le domaine artisti¬ 
que et la communication. 
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LE NOUVEL ATARI ST 


LE LIVRE DU GEM SUR 
ATARI ST 

Plus de 350 pages. 

Cet ouvrage contient ce qu’il est 
nécessaire de savoir pour utiliser 
GEM efficacement : Fonctionnement 
de la souris, Virtual Device 
Interface, Application Environment 
Services, Graphics Device Operating 
System. Description de routines 
utilisant GEM en BASIC, C et en 
Assembleur. Utilisation standard et 
spécifique de l’operating System. 


Ce livre décrit la superbe machine 
qu’est l’ATARI ST. 

Architecture, interfaces, operating 
System, le bios, GEM, LOGO, le 
processeur 68000, sont quelques-uns 
des thèmes abordés. Ce livre doit 
être lu par tous ceux qui suivent de 
près le monde de la micro- 
informatique. 


Réf. : ML125 


Prix : 149 FF 




LOGICIELS 


Réf : ML139 Prix : 149 FF 


MODULA-2 / ST 

Compilateur MODULA pour ATARI ST. 
MODULA-2 / ST est l'implantation com¬ 
plète du langage MODULA conçue par 
NIKLAUS WIRTH (auteur du PASCAL) sur 
520 ST. Ce compilateur permet de dé¬ 
velopper des logiciels utilisant GEM et 
les capacités graphiques du ST. Il est 
livré avec un éditeur complet lié au com¬ 
pilateur pour une détection rapide des 
erreurs Réf AT 001 Prix : 1450 F TTC 


LE LIVRE DU LANGAGE 
MACHINE DE l’ATARI ST 
Plus de 250 pages. 

Tout ce qu’il faut savoir pour tirer 
au mieux parti de votre ATARI ST : 
système de calcul et de bit manipu¬ 
lation du 68000 , utilisation des 
registres, structure des commandes, 
programmation structurée : 
récursion, piles, procédures et 
fonctions, listings sources de 
programmes assembleurs, routines 
systèmes... Un super livre ! 


MICRO INFO 
Pour en savoir plus 
Dans le numéro 3 : 
.Interview 
exclusive de 
SHIRAZ SHIVJI 
le père de 
l'ATARI ST. 

.De nombreux 
articles et 
documents. 

20 Frs 


Réf. : ML141 Prix : 149 FF 


ATARI ST TRUCS et ASTUCES 
Plus de 250 pages. 

Un recueil complet de trucs et 
d’astuces que votre tout nouveau 
ATARI ST va beaucoup apprécier ! 
Des graphismes fantastiques à partir 
de programmes en BASIC, des exemples 
et des conseils pour programmer en 
langage C et en Assembleur... 


Prix : 149 FF 


Réf. : Ml 140 


La BIBLE de l'ATARI ST 

Plus de 500 pages. 


Ce livre contient un ensemble 
complet d’informations sur l'ATARI 
ST, la description HARDWARE de la 
machine ainsi que des schémas 
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ERE DES 


ROBOTS 

SAPENS 


Né d’un éclat de rire, Hilare représente l’une des 
réalisations les plus abouties en matière d’intelligence 
artificielle intégrée à la robotique. Grâce à ces systèmes 
performants, le robot pourra se substituer à l’homme 
dans des opérations de plus en plus délicates. 


L ’espérance de vie d’un robot ex¬ 
périmental est bien fugace. Hi¬ 
lare, robot mobile de son état, 
n’échappe pas à son destin. Sa mise à 
la retraite se confondra, en juin 86, 
avec la naissance de son digne suc¬ 
cesseur : Hilare 2. Sept années donc, 
durant lesquelles les prouesses de 
«l’enfant chéri» du LAAS/CNRS ont 
fait le tour du monde, par le biais d’une 
multitude de communications scientifi¬ 
ques. 

Lorsqu’en 1979 les chercheurs de ce 
laboratoire toulousain planchaient sur 
un nom approprié à leur projet de ro¬ 
bot évolutif, un fou rire général raison¬ 
na dans la salle blanche. Un collègue 
retardataire fit alors irruption et deman¬ 
da, incrédule, « pourquoi êtes- vous hi¬ 
lares?». Regards complices. Le patro¬ 
nyme était trouvé. Restait à lui prêter 
une rigueur scientifique. On décida 
qu'Heuristique Intégrée aux Logiciels 
et aux Automatismes dans un robot 
évolutif ferait bien l’affaire. Un titre 
pompeux pour un projet d’envergure. 
En contemplant cette vague caisse à 
roulettes regorgeant d’un invraisem¬ 
blable bricolage électronisé, qui soup¬ 
çonnerait aujourd’hui avoir devant lui 
Hilare, pionnier de la robotique, capa¬ 
ble d'intégrer le nec plus ultra de l’in¬ 
telligence artificielle? Cette déception 
esthétique s'estompe lorsque Raja 
Chatila (chargé de recherches au La¬ 
boratoire d’Automatique et d’Analyse 


Ces drôles de machines n'ont pas 
l'aspect humain des robots de fiction. 
Mais leurs facultés sont grandes : de la 
préhension la plus fine (Sensor de 
l’U.M.A., U.S.A.) à la compréhension du 
langage naturel, en passant par la vision 
et l’appréhension de l’espace (Hilare, du 
LAAS). 
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L ERE DES 

ROBOTS 

SAPIENS 


LES ROBOTS 
«INTELLIGENTS » NE 
PLAGIENT QUE 
GROSSIÈREMENT LES 
MÉCANISMES INTIMES DU 
RAISONNEMENT HUMAIN 


des systèmes) dresse le brillant C.V. 
de son protégé. « Hilare est un robot 
logiciel dont ta principale caractéristi¬ 
que est son aptitude à raisonner. » Ne 
rêvons pas. Loin d'égaler les compé¬ 
tences humaines, il en détient tout de 
même certaines facultés. Il s’affirme 
actuellement à l’aide de deux systè¬ 
mes performants : l'un concerne la 
compréhension du langage naturel, 
l’autre la vision. Il leur doit son 
autonomie. 

« S’il te plaît, rends-toi au fond de la 
salle !» L’ordre est tapé sur le clavier. 
Hilare doit maintenant le décoder. Le 
système SYROCO vient alors à son 
secours. SYROCO est un logiciel mis 
au point par l'équipe de Fabrice 
Evrard, du LSI (Laboratoire « Langages 
et Systèmes Informatiques» CNRS- 
UPS-IN P) : « Il analyse à sa façon te 
sens d'une phrase écrite. C’est un tra¬ 
ducteur tangage humain/code robot 
qui agit dans les deux sens, en fonc¬ 
tion du champ d'application d'Hilare. 
Ici, les mécanismes intimes du raison¬ 
nement humain sont grossièrement 
plagiés.» Avec SYROCO, Hilare dis¬ 
pose d’un ensemble de règles aux¬ 
quelles il va se référer, qu’elles soient 
syntaxiques et sémantiques (critères 
de sens, objet servant à tel usage plu¬ 
tôt qu’à tel autre) ou pragmatiques 
(place des objets dans l'univers du ro¬ 
bot). Les formules de politesses n’ont, 
chez lui, aucune raisonnance. Il ignore 
le « s'il te plaît», au grand dam de la 
courtoisie affectueuses de Fabrice 
Evrard. « Pas question qu'il évalue 
dans le détail si la phrase est gramma¬ 
ticalement correcte. Hilare, efficace, 
fixe son attention sur le verbe qui pilote 
le sens de la phrase et sur les objets 
concernés qu'il confronte à sa mé¬ 
moire». Ainsi, le verbe « poser» aura 
autour de lui les objets que l'on pose 
et ceux qui peuvent porter. Dans un 
deuxième temps les autres mots se¬ 
ront désignés en fonction des règles 
d’interprétation. 

Hilare «comprend » 
le but de sa mission 

Une phrase s'interprète de plusieurs 
manières. Seule la connaissance con¬ 
textuelle du dialogue lèvera toute am¬ 
biguïté/ A force de déduction Hilare 
comprend le but de sa mission, l’action 
s’impose. Sept ans d’errance l'ont ha¬ 
bitué aux méandres du LAAS. Qu’ad- 
vient-il si un obstacle imprévu vient 
subitement lui barrer la route Hilare dé¬ 
jouera tous les pièges. Sur ce point le 
robot doit beaucoup à l’équipe de 
Maurice Briot, il lui doit la vue. 

Fini l’automatisme spontané des pro¬ 
grammes aveugles, il dispose de tout 
un arsenal de capteurs sensibles qui 
vont de la caméra au détecteur à ultra¬ 
sons sans oublier le télémètre laser 
moyen de repère privilégié aujourd'hui 


bien maîtrisé par les chercheurs du 
LAAS. Moment de vérité : qu'en est-il 
de son efficacité? Hilare s’élance dans 
la grande salle du LAAS. Pêle-mêle, 
une console, un bureau, voire un cher¬ 
cheur en pleine méditation algorithmi¬ 
que encombrent sa trajectoire. Son dé¬ 
placement s’effectue tout en sou¬ 
plesse, sans coup férir. Ses facultés 
d’appréhension de l’espace sont im¬ 
pressionnantes. Il jette un faisceau 
d’infrarouge, le'temps établi entre les 
impulsions et leur écho sur leur récep¬ 
teur lui donne une idée constante de 
sa position. D’après la prise en compte 
des variations de distance, il rectifie sa 
trajectoire et ce pratiquement en temps 
réel. Eviter un obstacle nécessite une 
réflexion de quelques secondes. Eton¬ 
nant quand on sait que l’information a 
été traitée à 250 kilomètres de là. 

Son cerveau : un monstre 
à trois têtes 

Le chariot mobile n’est en fait que la 
partie visible de l’iceberg Hilare. Son 
cerveau est un monstre à trois têtes. 
Un premier calculateur embarqué sur 
l’appareil résoud les tâches routiniè¬ 
res. Ainsi les données recueillies par 
les ultrasons ceinturant le robot met¬ 
tent en œuvre une électronique de bas 
niveau et nécessite des calculs sim¬ 
ples. Il n’en est pas de même pour des 
opérations plus complexes de généra¬ 
tion de plan : Hilare sait qu’il peut 
compter sur deux gros calculateurs fi¬ 
xes, situés à Toulouse et à Montpellier. 
Il a choisi sans encombre le chemin le 
plus court. L’opération a duré quelques 
secondes. Mieux ! ce parcours est dé¬ 
sormais mémorisé, Hilare peut d’une 
seule traite refaire le chemin en sens 
inverse. Un individu d’humeur mes¬ 
quine pousse un obstacle imprévu sur 
sa route. Peu importe, il est dans les 
facultés d’Hilare d’entreprendre des 
actions correctives et de choisir éven¬ 
tuellement des itinéraires de remplace¬ 
ment, performance que les chercheurs 
ont à coeur d’améliorer. Pour eux, le 
must serait de doter la machine d'un 
réel organe de vision. Ce vieux projet 
prend forme, le fruit de leur effort tarde¬ 
ra peu : Hilare disposera bientôt de la 
stéréovision, une méthode qui néces¬ 
site l’emploi d'une caméra translatée 
ou plus simplement l’utilisation simul¬ 
tanée de deux caméras. Dans les deux 
cas, un calculateur mesurera la diffé¬ 
rence entre les images afin d’en ex¬ 
traire la profondeur. Cette triangulation, 
méthode apparentée à la vision hu¬ 
maine, sera un outil indispensable aux 
prétentions intelligentes artificielles 
d’Hilare. M. Briot, chargé de mener à 
bien le programme vision, espère bien 
aboutir courant 86. La fonction scopi¬ 
que, la vue, pour être plus clair, est as¬ 
surée par des caméras CCD, à la fois 
robustes et peu encombrantes. Em- 
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barquées sur la machine, elles pour¬ 
ront approcher les objets visés pour 
améliorer leur résolution. Mais la 
bonne définition d’une caméra dépend 
en fait du nombre d’éléments sensi¬ 
bles de sa rétine. Dans ce domaine, 
les progrès obtenus en miniaturisation 
électronique sont considérables. A 
Toulouse, le groupe de recherche sur 
la vision par calculateur du LSI a mis 
au point une micro-caméra de haute 
résolution (208 points sur 288) dont le 
poids est tout juste de 75 grammes. Un 
succès scientifique doublé d’une ex¬ 
cellente réussite commerciale. Adapté 
aux exigences industrielles de pointe, 
ce produit fait l’objet d'un marché flo¬ 
rissant à l'échelon international. Le 
programme d’Hilare est le premier bé¬ 
néficiaire de cette émulation régionale 
dans les techniques de vision. Ses ca¬ 
méras seront bâties sur un schéma 
identique, mais leur définition sera 
beaucoup plus performante, (388 
points sur 480). Elles disposeront de 
transistors grâce auxquels, l’intensité 
lumineuse deviendra charges électri¬ 
ques avant d'être convertie en signal 
vidéo. 


son aîné et sa puissance embarquée 
sera dix fois supérieure. Les capteurs 
seront plus nombreux et il sera notam¬ 
ment équipé d’un terminal vocal fourni 
par la société VECSY. 

Finies les commandes fastidieuses par 
clavier, Hilare 2 disposera de 200 mots 
environ, nombre amplement suffisant 
pour s’acquitter des tâches de proto¬ 
type promis à des applications indus¬ 
trielles. Il sera, en outre, muni de vérita¬ 
ble odomètres servant à la mesure du 
déplacement, d'un central d’inertie et 
d'un inclinomètre. Le but de l’opération 
est d’expérimenter à plein son autono¬ 
mie décisionnelle afin d’un connaître 
les limites. Hilare 2 sera une structure 
mobile arrondie et bénéficiera d’une 
esthétique tentant de faire oublier la 
piètre image incarnée par son illustre 
prédécesseur. Hilare se meurt, vive Hi¬ 
lare 2! Les chercheurs verseront-ils 
une larme sur ce vieux prototype né 
d’un éclat de rire? 


Edouard Figueira 
(La CAN) 


Sa vue : un chef-d’œuvre 
de précision 


Mais voir, c’est aussi comprendre 
l’image que l’on saisit. Le signal sera 
donc numérisé pour être compatible 
avec un calculateur. L’environnement 
est suffisamment riche et complexe. Il 
doit être appréhendé à partir d’images 
fidèles, au plus près des détails et 
nuances. L'acuité visuelle d’Hilare est 
un chef-d’œuvre de précision. A défaut 
de couleur, elle dispose d’une gamme 
de 256 niveaux de gris qui donneront 
accès à autant d’intensités lumineu¬ 
ses. Les détails visuels auront bien du 
mal à s’estomper face à un tel pillage 
d'information. Côté repérage et recon¬ 
naissance des formes, Hilare est un 
vrai professionnel. Sa vue perçante né¬ 
cessite une adéquation dans les per¬ 
formances des opérateurs. Les cher¬ 
cheurs du LAAS, perfectionnistes, pré¬ 
voient des temps de réflexion qui 
seront ramenés à quelques secondes 
à peine. Où s’arrêteront les prouesses 
techniques d'un tel robot? La relève 
est assurée, les faire-part calligra¬ 
phiés. La naissance du petit frère, Hi¬ 
lare 2, est annoncée pour juin 1986. 
Cancer ou Gémaux? Hilare 2 est un 
projet financé en grande partie par la 
direction de la recherche des études 
techniques (DRET), de l'armée, et de 
l’Agence de l’Informatique (ADI). Un 
parrainage qui n’a pas rechigné sur les 
moyens quand on connaît la somme 
alléguée pour le coût de l’équipement : 
un million de francs. Il sera plus léger, 
conservera les qualités essentielles de 


MIDI-ROBOT 

RECHERCHE TOULOUSAINE 
POUR VIE INDUSTRIELLE 


« La technologie c'est donner vie à un 
produit de laboratoire pour l'intégrer 
dans le tissu industriel ou social». Eric 
Daclin sait de quoi il parle. Il est actuel¬ 
lement directeur de Midi-Robot, socié¬ 
té chargée de donner une vie indus¬ 
trielle à la recherche toulousaine. Ingé¬ 
nieur de l’INSEElHT, il dirigea à ses 
débuts le département automatique de 
recherche appliquée du CERT, puis il 
entre dans l’industrie à CGE- Alcatel, 
où il supervise le département d’appli¬ 
cation des technologies avancées. 
Une riche expérience : il y fait ses pre¬ 
mières armes en robotique. Quand se 
décide la création de Midi-Robot, il est 
tout désigné pour conduire le bâteau. 
Eric Daclin voit dans les impératifs du 
marché une ouverture, une loi qui 
donne du sens à son travail et un 
moyen d'approcher les réalités d’au¬ 
tres hommes. « L'industrie, c’est cô¬ 
toyer le monde social et adapter les 
machines qui soient de véritables ou¬ 
tils au service de l’homme.» L'intégra¬ 
tion des robots dans notre environne¬ 
ment quotidien doit se faire par étapes 
progressives pour familiariser les gens 
avec le monde technologique. Eric Da¬ 
clin abonde pleinement dans ce sens : 
« Adapter la robotique à la société, 
c’est comme manger un éléphant, il 
faut le faire bouchée par bouchée. Ici, 
notre devise c’est Kiss, c'est-à-dire 
keep it simple stupid. » 


Affectueusement dénommé « ta bête » par les 
chercheurs du LAAS-CNRS (Laboratoire 
d’Automatique et d'Analyses des systèmes de 
Toulouse), Hilare erre dans la grande salle 
d’expérimentation en attendant la naissance 
d’Hilare 2, prévue pour juin 86. La puissance 
embarquée d'HUare 2 sera dix fois supérieure à 
celle de son ai né... 
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OUI NEUF 



O n attendait une révolution. On a 
une réforme. Le nouveau Mac 
est arrivé. Nom de baptême : 
Macintosh Plus. Rien à voir, donc, avec 
les fameux noms de code : Oréo ou 
Jonathan. 

Disons-le tout net, Mac Plus ne corres¬ 
pond pas du tout à ce que nous atten¬ 
dions. Sans parler de déception, on 
peut dire qu’Apple nous surprend. 
Pourquoi ? Tout d’abord parce que ce 
nouveau Mac semble à peine différent 
de ses petits frères 128 et 512 Ko. 

Ah la la ! On peut dire que les rumeurs 
allaient bon train ces dernières semai¬ 
nes. Ça jasait dans le petit monde de 
la micro-informatique. Jugez plutôt de 
ce que l’on a pu entendre : « Le nou¬ 
veau Mac est en couleurs ». Raté mes 
enfants ! Pas le moindre soupçon de 
commencement de pastel sur Mac 
Plus. L’écran reste (désespérément ?) 
noir et blanc. Chez Apple, on justifie ce 
choix : « Nous avons fait une étude au¬ 
près des utilisateurs professionnels de 
Macintosh. Il en ressort que l’utilisation 
de la couleur n’apparaît pas comme 
une préoccupation majeure. Par ail¬ 
leurs il est moins fatigant pour l’œil de 
travailler en noir et blanc ». On notera 
cependant que tout le logiciel interne 
du Mac est conçu pour travailler en 
couleurs. On n’est jamais trop 
prévoyant ! 

« Le nouveau Mac aura un écran plus 
grand, de la taille d’une feuille A4... Ça 
va être chouette, on pourra visualiser 
entièrement son document de tra¬ 
vail !» Encore raté. Mac Plus ne 
change pas d’aspect extérieur pour ce 
qui concerne l’écran. 

« Il sera tout blanc, comme la nouvelle 
imprimante Imagewriter ». Hé bé non ! 
Il n’est pas non plus tout blanc, mais 
de la même couleur crème que ses 
prédécesseurs. 

Alors, comment est-il ce nouveau Ma¬ 
cintosh ? Du calme. J’y viens. 


Il 

m 

un 



MarirtoshP' 11 * 
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Si je ne m’approche pas trop près, je 
ne constate rien de différent. Mais avec 
un peu de concentration et le sens 
aigu de l’observation qui me caracté¬ 
rise, j’avise une première particularité 
du Mac Plus : le clavier est équipé en 
standard d’un pavé numérique. Ça 
c’est une bonne chose qui va faire plai¬ 
sir à la corporation des comptables et 
autres fanas du calcul rapide. Rien 
n’est plus agaçant, en effet, que de ta¬ 
per ses petites additions avec des 
chiffres alignés horizontalement. 
Seconde surprise : le clavier est dé¬ 
sormais muni de touches de déplace¬ 
ment. Qu’est-ce à dire?-Apple nous 
avait habitué à l’utilisation systémati¬ 
que de la souris pour le déplacement 
du curseur. J’en déduis logiquement 
que la philosophie du constructeur 
s’assouplit avec le temps. 

La souris présente des inconvénients. 
À commencer par le refus catégorique 
de certaines personnes à la manipuler. 
Il faut un temps d’adaptation pour que 
le cerveau apprenne à faire la liaison 
entre les mouvements plans de la main 
sur la table et le déplacement du cur¬ 
seur sur l’écran. Ça a l’air idiot, mais 


pour quelques individus, manipuler la 
souris revient à leur demander de se 
taper sur le ventre avec la main gauche 
et de se frotter le crâne d’un mouve¬ 
ment circulaire avec la main droite. Le 
tout en même temps et sur un seul 
pied SVP. 

Donc le retour des flèches de déplace¬ 
ment est une possibilité supplémen¬ 
taire qui ramène le Mac Plus à un 
standard d'utilisation plus large. Je si¬ 
gnale au passage qu’il est souvent 
plus simple, pour des programmes 
comme le traitement de texte par 
exemple, de posséder toutes les com¬ 
mandes au clavier. Lâcher celui-ci pour 
saisir la souris est une perte de temps 
et un geste non naturel. 

A priori, rien de changé sur le lecteur 
de disquettes. Erreur ! Le Mac Plus est 
équipé des nouveaux lecteurs de dis¬ 
quettes double face d’une capacité 
de 800 Ko. On reste bien sûr en 3,5 
pouces qui s’annonce comme le stan¬ 
dard des années 90. L’intérêt de ce 
nouveau lecteur saute aux yeux : on 
peut désormais travailler avec un pro¬ 
gramme et des données sur une 
même disquette. Je m'explique : lors¬ 
qu’une disquette contient MacWrite ou 
MacPaint, il reste très peu de place 
pour y stocker des textes ou des des¬ 
sins. Par conséquent, il faut posséder 
un lecteur externe pour sauvegarder 


les documents sur une autre disquette. 
Cette fois, avec une disquette conte¬ 
nant MacWrite, on pourra sauvegarder 
jusqu’à 600 Ko de données sans lec¬ 
teur externe et sans avoir besoin 
d’éjecter la disquette. C’est un pro¬ 
grès. Que dis-je : une révolution. Ma¬ 
cintosh commence à régler ses pro¬ 
blèmes de jeunesse. 

Le Macintosh Plus est contournable. 
J’en ai fait le tour. L’alignement des pri¬ 
ses diffère de celui des anciens modè¬ 
les. Ce qui revient à dire qu’il y a du 
nouveau. Et pas de la gnognote. A côté 
de la prise habituelle pour lecteur ex¬ 
terne se trouve une grosse broche 
baptisée Bus SCSI. Ce qui signifie en 
pur anglais d’Oxford : small computer 
System interface. Il s’agit ici d’un con¬ 
necteur « intelligent» et ultra-rapide 
permettant d’adjoindre au Mac toutes 
sortes de disques durs et autres systè¬ 
mes de mémoire de masse. On parle 
déjà des Compact Dises (vous savez, 
ces petites choses à laser sur lesquel¬ 
les on peut stocker jusqu’à 600 méga¬ 
octets de données dans un mouchoir 
de poche, bonsoir les dégâts). Plus 
prosaïquement, l’interface SCSI amé¬ 
liore la vitesse de chargement et le 
stockage des données sur disque dur. 
Ça va plus vite et on peut conserver 
son lecteur externe. 


Bouleversements 

internes 

Les connecteurs d’imprimante et de 
modem sont remplacés par des peti¬ 
tes prises circulaires au format DIN, 
identiques à celles de l’Apple 2c. 

Les grands bouleversements de Mac 
Plus se trouvent à l’intérieur de la ma¬ 
chine. La carte mère a été entière¬ 
ment redessinée. Ce qui signifie 
qu’elle est plus belle, plus efficace et 
surtout plus rapide. Le microproces¬ 
seur reste le même : 68000 de chez 
Motorola. 

En revanche, la mémoire morte dou¬ 
ble sa capacité avec 128 Ko au lieu 

de 64 Ko. Pour les non-initiés, la mé¬ 
moire morte contient tous les program¬ 
mes internes caractéristiques au Ma¬ 
cintosh. Exemple : la fameuse boîte à 
outils pleine de routines pour réaliser 
des fenêtres, des menus, des dessins, 
etc. Un vrai bric-à-brac logiciel grâce 
auquel tous les softs publiés pour Mac 
ont un petit air de famille et sont sim¬ 
ples à utiliser. 

Cette mémoire morte a donc été réé¬ 
crite et améliorée. En théorie elle reste 
compatible avec l’ancienne. Toutefois 
l’exécution des programmes sera plus 
rapide. L’affichage des fenêtres, par 
exemple, s’exécute pratiquement deux 
fois plus rapidement. Je ne vous parle 
pas de l’ouverture et de la fermeture 
des volets. Cela va si vite qu’il n’y a 
plus de place pour les courants d’air. 
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OUT NEUF 


Quitte à modifier les ROMS, la carte et 
tout le tralala, les ingénieurs d’Apple 
en ont profité pour améliorer le sy- 
tème et le programme FINDER qui 
devient la version 5.0. Celui-ci permet 
désormais de gérer les disques durs 
sans limitation de fichiers. Pour les 
spécialistes, ce système a été transfor¬ 
mé en un système de Gestion hiérar¬ 
chique. Ça baigne. 

Autre amélioration : la capacité en 
mémoire vive (RAM) passe de 512 Ko 
à 1024 Ko. Faites le calcul : c'est le 
double. Cela signifie que l'on pourra 
travailler sur des documents beaucoup 
plus importants en taille avec des pro¬ 
grammes encore plus sophistiqués. 
On n’arrête pas le progrès. La baisse 
des prix des composants est l’une 
des raisons pour lesquelles il devient 
impardonnable d’acquérir des micro¬ 
ordinateurs pauvres en mémoire. 
Conséquence logique : Apple va ces¬ 
ser la commercialisation du modèle 
128 Ko. Qu’on se le dise. Les derniers 
modèles sont à vendre jusqu'à épuise¬ 
ment des stocks. Mais attention : la 
plupart des nouveaux logiciels ne 
fonctionneront que sur une configu¬ 
ration minimale de 512 Ko. A vous de 
juger... 

Jean-Louis Gassée, désormais vice- 
président d’Apple Etats-Unis, s'est 
laissé à la confidence suivante dans 
les colonnes de l’un de nos confrères : 
« 1986 sera l’année la plus riche en an¬ 
nonce de notre histoire. » Autant le dire 
franchement : si Macintosh Plus cons¬ 
titue une amélioration certaine du Mac, 
il est loin de représenter une nou¬ 
veauté extraordinaire. Donc atten¬ 
dons-nous à du neuf... 

Macintosh Plus apparaît comme un 
maillon logique dans une gamme en 
pleine expansion. Sans répondre à 
l’attente (justifiée) des utilisateurs, il 
apporte un nouveau confort d’utilisa¬ 
tion qui renforce sa position sur le mar¬ 
ché professionnel. 

Mac Plus ne cherche pas à rivaliser 
avec ses concurrents : Jackintosh ou 
Amiga. Apple poursuit sa trajectoire 
vers des objectifs qui paraissent 
clairs : plus de mémoire, plus de sim¬ 
plicité d’utilisation, dialoguer avec IBM, 
développer les réseaux. Le reste n’est 
que du gadget ! 


Pépé Louis 


L’AVENIR D’APPLE : JONATHAN ET... IBM ? 


Chez les spécialistes et dans les cou¬ 
loirs même d’Apple, un certain nombre 
de bruits circulent avec ténacité de 
bouche d’ingénieur à oreille de con¬ 
cierge. Je vous les livre tels quels. A 
vous de faire le tri. Tout d'abord, Mac 
Plus ne serait qu’un maillon en atten¬ 
dant la venue du nouveau Mac pour fin 
86/début 87. Cette machine serait (en¬ 
fin) dotée d’un grand écran et d'un mi¬ 
croprocesseur Motorola 68020, plus 
rapide et plus sophistiqué. 

Mais la grande nouvelle est la recher¬ 
che de compatibilité avec IBM. Pas 
tant au plan de la structure interne de 
la machine que des possibilités de 
communication. Autrement dit, Macin¬ 
tosh pourra dialoguer avec IBM. 

Dans le même ordre d'esprit, on an¬ 
nonce officieusement un nouvel Apple 
2 pour la fin de l’été, qui devrait égale¬ 
ment aller dans le sens d'une compati¬ 
bilité avec IBM. La hache de guerre 
paraît donc définitivement enterrée en¬ 
tre les deux grands de la micro. 

La nouvelle politique d’Apple tend à 
rapprocher les deux lignes de pro¬ 
duits : Apple 2 et Macintosh. Le lecteur 
de disquettes double face UNIDISK en 
est un bon exemple, puisqu’on peut le 
connecter indifféremment sur l'une ou 


l’autre machine. Une simple modifica¬ 
tion du câble suffit. 


MAC A L’ÉCOLE 

Puisque le Plan informatique pour 
tous n'a pas jugé bon de retenir 
Apple parmi les constructeurs pri¬ 
vilégiés, celui-ci s’est tourné vers 
les universités et les écoles pri¬ 
vées. C'est ainsi que Polytechni¬ 
que et l’Université de Compiègne 
se sont portés acquéreurs, cha¬ 
cun, d’une cinquantaine de Macin¬ 
tosh. Bonjour les grosses têtes. 


LASERWRITER 

La nouvelle génération de Laser¬ 
Writer (imprimante à laser) vient 
d’arriver. Plus belle, plus rapide, 
plus sophistiquée ! Un véritable 
micro-ordinateur à elle seule puis¬ 
qu’elle contient des ROM et des 
RAM. Son système interne a été 
amélioré et Apple met en vente un 
Kit d’adaptation pour le premier 
modèle LaserWriter. Tout le monde 
est content. 


FICHE TECHNIQUE 


Nom : Macintosh Plus 

Constructeur : Apple 
Microprocesseur Motorola 
68000 

Mémoire Morte : 128 Ko 
Mémoire vive : 1024 Ko exten¬ 
sible à 2048 Ko 

Système d’exploitation : Fin- 
der5.0 

Lecteur de disquettes in¬ 
terne : 3 pouces 1/2, 800 Ko, 


double face 

Lecteur de disquettes ex¬ 
terne : idem 

Clavier : 77 touches Azerty, 
pavé numérique intégré. Tou¬ 
ches de déplacement du cur¬ 
seur. 

Connecteurs : souris, modem, 
imprimante, lecteur externe, bus 
SCSI 


LES PRIX 


L’arrivée du Mac Plus bouscule un 
peu les étiquettes chez les mar¬ 
chands de pommes. Voici les 
cours de saison : 

Macintosh Plus : 25 900 F 
Mac 512 Ko : 22 900 F 
Lecteur de disquettes externe : 

3 900 F 

Imprimante LaserWriter : 49 900 F 

Ces prix s'entendent hors taxes. 
D’autre part, les heureux posses¬ 


seurs de Mac 512 Ko et 128 Ko se 
voient offrir la possibilité de doper 
leur machine en version Mac Plus. 
Le kit de transformation coûte 4 
500 F pour le 512 Ko et 6 500 F 
pour le 128 Ko. (Hors taxes 
toujours). 

Cette « mise à niveau » comprend 
les changements du clavier, du 
lecteur de disquette interne, de la 
ROM et de la RAM, du panneau de 
connexion arrière. 


26 


Micro V.O n° 5 - Mars 86 




CHEFS D’ENTREPRISE ! 


OCCUPEZ 

LE 

TERRAIN 



COUVERTURE DES 
12 RADIOS 


“FAITES-VOUS ENTENDRE 


12 RADIOS LOCALES PRIVEES 
A VOTRE SERVICE 

RADIO ALINE 101.5 

ARTOIS 2000 97.7 

AZUR 100 100.2 

CANAL 60 94.2 

HORIZON 60 90.8 

RADIO MAGNUM 92.4 

RADIO PEVEL 97.1 

R.B.L. 91.6 

R.C.P. 96.9 

R.G.R. 91.8 

R.L.F 88.5 

RADIO VOIX DU NORD 92.7 



UNE COUVERTURE NATIONALE 



UN SUPPORT INCONTESTE : LA FM 


MVB 

Société_ 

Adresse :_ 

_Téléphone :_ 

Personne à contacter_Fonction 


HEXANORD FM - Groupement Intérêt Economique 
59, Grande Rue - 02400 CHATEAU-THIERRY - TéL 23.83.64.04 



OFFREZ SA 
A VOTRE 
MICRO 


REVUE 



1LEPC\ r, 


UNE. 

:MU. 


S HJRIS. 


IQUE SUR AMSTRAD 
LA SARABANDE 
DEHAENDEL 


B256 SOUS 
TOUTES LES COUTURES 
POUR VOTRE CPC 


LA REVUE 
DE VOTRE 





AMSTRAD 
(CPC 464,664, 
6128, PCW 82561 


LA REVUE 
DE VOTRE 
THOMSON 
(MO 5, TO 7, 
TO 7/70, TO 91 


LA REVUE 
DE VOTRE 
COMMODORE 
(Vie 20, C 64, 

I 


MICROSTRAD, MICROTOM, MICRODOR : 

DES REVUES VRAIMENT CONÇUES POUR 
LES BESOINS DES UTILISATEURS DE 
MICROS AMSTRAD, THOMSON OU 
COMMODORE 


Dans chaque numéro : 

• Un panorama complet des nouveautés et une informa¬ 
tion concrète sur votre micro et son environnement 


• Des logiciels, des langages, des périphériques testés 
en toute indépendance 

• Un cocktail de programmes (utilitaires, éducatifs, ludi¬ 
ques, etc.) pour passionnés, petits ou grands, spécialistes 
ou débutants 

• Des astuces, des idées, des conseils pour rendre votre 
micro passionnant 

• Des dossiers originaux réalisés par une équipe d'experts 


»► 


BULLETIN D’ABONNEMENT A RETOURNER A 


ELOI ET CIE, 

Service abonnements 


5, place du Colonel-Fabien - 75491 Paris Cedex 10 
□ Je désire m’abonner au prix avantageux de 134 FF pour 6 numéros 
(188 FF étranger, 240 FF par avion) à : 

(cocher la case appropriée) 

□ MICROSTRAD à partir du n°. 

□ MICROTOM à partir du n°. 

□ MICRODOR à partir du n° 

Je réalise ainsi une économie de 20 % sur le prix de vente au numéro. 


□ Je désire recevoir le(s) numéro(s) . de MICROSTRAD 

. de MICROTOM 

. de MICRODOR 

Prix d’un numéro : 28 FF (37 FF étranger, 45 FF par avion). 


NOM : . Prénom : . 

Adresse : . . 

Code postal : .Ville : . 

Ci-joint, indispensable, mon règlement par chèque bancaire ou postal 
libellé à l’ordre de ELOI ET CIE. 


tests 


MICROSTRAD, MICROTOM et MICRODOR sont des publica¬ 
tions du Groupe TESTS, premier groupe de presse informatique 
en France (L'Ordinateur Individuel, Ordi-Magazine, Infomac, 
01 Informatique, etc.). 


TURBC 

TEXTE 


PASCAL AL ESSAI 

MUT: UN VRAI 
TRAITEMENT DE TEXTE 
POUR CPC 


MICROTOM 


GUIDE DES 
MICROS THOMSON 


160 LOGICIELS ET 

LANGAGES 

TESTÉS 


70 PÉRIPHÉRIQUES ET 

EXTENSIONS 

DÉTAILLES 


50 LIVRES 
SÉLECTIONNÉS 


US MODES 
GRAPMQUES 
DE LANKA 
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LES ADRESSES 


DU BASIC 7.0 
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VK20, C64, C128 


















































APPLE : 

WOZNIAK JOUE 

AUX BILLES (30) 

AMSTRAD : 

IL FAIT L’ARTISTE (33) 

THOMSON : 

DES NOTES ET 
QUELQUES MOTS (67) 

COMMODORE : 

ROUTINES... (68) 

ORIC : 

LA BOMBE SEDORIC (70) 

ucy . 

I WENTTO THE 
MARKET... (70) 

RESEAUX : 

MINITEL : 

TESTS ACCROCHE- 
CŒURS (74) 

SINCLAIR : 

SŒUR ANNE. NE VOIS-TU 
RIEN VENIR? (76) 

























ulWOZNlAK 

■JOUE 

posi 

tuell 

AUX BILLES 1 


retourne-t-il, vous deman¬ 
dez-vous (car trop d’anglais 
dans une phrase vous 
donne des boutons). Un 
RAMDISK est un astucieux 
programme qui charge dans 
une partie de la mémoire ré¬ 
servée à cet effet un certain 
nombre de programmes ou 
d’accessoires. C’est vous 
qui déterminez la taille de 
cette mémoire réservée. 


dises. Quand on pense que 
le stockage des données a 
démarré avec des mini-K7 à 
pédales, on croit rêver. 
C’était l'âge de pierre (ou de 
Paul). 


L es Zapple-maniaques 
sont de retour. Et le 
feuilleton continue. Ap¬ 
ple nous a habitué aux 
coups de théâtre. Cette fois 
on se croirait en pleine co- 
media dell' a rte. J’en étais 
resté au départ en grande 
pompe de Steve Jobs (avec 
quelques collaborateurs 
bien choisis dans ses vali¬ 
ses). 

Ce mois-ci, c’est le retour de 
Steve Wozniak, grand-papa 
de l’Apple 2 devant l’éternel. 
On savait que Wozniak n'ap¬ 
préciait pas la tournure des 
événements lorsqu'Apple 
opposait ses deux lignes de 
produits : Apple 2 et Macin¬ 
tosh. Avec le départ de Jobs 
et l’enterrement de la hache 
de guerre entre les deux di¬ 
visions, c’est une nouvelle 
ère qui commence. 

Du coup, Wozniak a décidé 
de réinvestir quelques billes 
dans l'affaire. On parle de 5 
millions de dollars, ce qui 
fait cher la bille. Tout cela 
ressemble fort à un chassé- 
croisé. Continuez comme 
cela, ça met de l'animation 
dans les chaumières. 
Jean-Louis Gassée semble 
bien s’adapter à sa nouvelle 
fonction de vice-président 
aux Etats-Unis, mais on le 
voit épisodiquement en 
France. Son sens inné de la 
communication l'amène à 
faire quelques détours sur 
nos radios et télés. 

Jean Calmon, président 
d’Apple France, reste plus 
discret. Mais bon, la société 
se porte bien malgré ses 
détracteurs. On attendait 
plein de nouveautés pour 
janvier. Pas de grande révo¬ 
lution : on prépare l’avenir 
tranquillement. Avec un œil 
sur les futurs compact- 


P. Ingénierie se secoue les 
puces. Cette société, créée 
fin 84, semble naviguer non 
pas dans le sillage d'Apple, 
mais légèrement devant. Je 
m'explique : alors que le 
Macintosh Plus sort avec un 
méga (1 024 000 octets) de 
mémoire vive en janvier, P. 
Ingénierie commercialise 
depuis plusieurs mois déjà 
sa fameuse extension Mac- 
Mega 

Celle-ci porte la mémoire du 
Mac à 1 024 Ko en mode uti¬ 
lisateur ou en deux fois 512 


L’avantage est évident : au 
lieu d’aller chercher un pro¬ 
gramme sur la disquette, le 
Mac y accède directement. 
OK. Mais si les programmes 
stockés en mémoire vive 
prennent trop de place, il ne 
reste plus grand-chose pour 
vos documents. 

Exemple simple et précis : 
pour échanger facilement 
des documents, on peut 
charger en mémoire (grâce 
à Speedy, merci) le traite¬ 
ment de textes MacWrite et 
le logiciel de dessins Mac¬ 
Paint. Le passage de l’un à 
l’autre devient facile et ra¬ 
pide. Ouverture de MacW¬ 
rite : 5 secondes au lieu de 
32. Ouverture de MacPaint : 
4 secondes au lieu de 21. 
Vous me suivez ? Mais, si 
ces deux programmes char- 
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gés en mémoire limitent la 
taille de vos documents, l’in¬ 
térêt lui-même s’en trouve 
altéré. Un peu comme si l'on 
vous donnait une super ma¬ 
chine à écrire mais avec 
seulement une feuille de 
papier. 

Avec MacMega et Speedy 

associés, on peut à la fois 
charger des programmes de 
travail (on appelle ça des 
applications chez les infor¬ 
maticiens à rayures) et bos¬ 
ser sur des grands docu¬ 
ments. Ouf... pff... Fus-je 
clair ? Recommencè-je ou 
passè-je à autre chose ? 

Je passe à autre chose ! 

800 Ko pour le Mac ! Avec 
Unidlsk c’est possible. Uni- 
disk, je vous en ai parlé 
dans le dernier Micro V.O. Si 
vous n'avez pas lu, à quoi ça 
sert que je me décarcasse. 
P. Ingénierie, encore eux, 
(pas de panique, je ne suis 
pas soudoyé) propose 
l'adaptation du lecteur de 
disquettes double-face Ap¬ 
ple 2c pour le Mac. La mani¬ 
pulation prend 15 minutes 
bien pesées et vous repar¬ 
tez avec un lecteur 800 Ko. 

Plus de problème pour tra¬ 
vailler avec des gros pro¬ 
grammes comme Jazz ou 
4D. Mais, me direz-vous, 
des disquettes double-face, 
on en trouve ? Oui ! Elles 
sont produites par Fuji et 
formatées grâce à un logi¬ 
ciel écrit par Imad lllostaz. 
Retenez bien le nom de ce 
programmeur, c’est une 
bête, un cerveau, un cas ! 

Mac 5, le dur de dur 
Allez hop ! Après l’augmen¬ 
tation de la mémoire vive du 
Mac, il nous faut de la mé¬ 
moire de masse. Et pour pas 
cher, autant que faire se 
peut. Le Mac 5 de Micro Ex¬ 
pansion (une boîte lyon¬ 
naise) est le plus économi¬ 
que de sa catégorie. Mais 
pas le moins solide. C’est 
carrossé comme une Mer¬ 
cedes, donc costaud. Pour 
moins de 10 000 F ht (faut 
encore les sortir), vous avez 
5 grands mégas à votre dis¬ 
position. En clair ; 5 millions 
de caractères. Sachant 
qu’un roman mesure en 
moyenne 300 000 caractè¬ 
res, combien de romans 
peut contenir Mac 5 ? En- 
voyez-moi la réponse au 
journal... 


EXPO 


Notre collaborateur et illus¬ 
trissime dessinateur Jean 
Solé a exposé ses dessins 
sur Macintosh pendant plus 
d’un mois chez Galilée Infor¬ 
matique. Prétextant d’une 
rougeole quelconque, vous 
n’êtes pas venu au vernis¬ 
sage et vous avez eu tort car 
le champagne coulait à flots. 
Fort heureusement j’ai récu¬ 
péré quelques unes de ces 
merveilleuses estampes in¬ 
formatiques. Désormais, 
pour séduire la pupi¬ 
treuse/programmeuse de 
votre choix, proposez-lui 
une petite visite de ces es¬ 
tampes dans votre garçon¬ 
nière. 



NOUVELLES 
DU CLUB 


Cette fois, c'est parti. On 
peut enfin accéder au ser¬ 
veur Club Apple via Trans- 
pac et Calvados. Donc, si 
vous n’avez pas renouvelé 
votre abonnement, il est 
grand temps de le faire. Ne 
serait-ce que pour rejoindre 
le staff des allumés Apple 
qui passent leurs soirées en 
convivialité plutôt que de 
sortir leurs copines aux 
Bains-Douches. 


CASSETTES, 

DISQUETTES 


I Pour Apple 2 : rien de très 


/ 

Sur¬ 


excitant ce mois-ci encore. 
Ou bien les éditeurs nous 
boudent. Ediciel publie Pa¬ 
pyrus Dactylo. Comme son 
nom l’indique, ce soft vous 
permet d’apprendre à taper 
à la machine (et non pas sur 
la machine). Vingt-cinq le¬ 
çons pour placer ses doigts 
juste où il faut. No comment. 
L’ensemble se présente 
sous la forme d’une dis¬ 
quette et d’un manuel de 32 
pages. C'est simple et hon¬ 
nête. Ça vaut dans les 500 F. 
Exactement sur le même 
créneau, Ordinateur Express 
présente Tap 2c. La ques¬ 
tion fondamentale étant : 
comment peut-on être per¬ 
formant avec un micro si l’on 
tape seulement avec deux 
doigts sur le clavier ? Ce 
soft est bien conçu, avec 
plein de dictées qui vous 
rappelleront les années ten¬ 
dres de l’école primaire. 
Musique Maestro ! Ediciel 
présente Micro flûte. Pan 
sur la flûte à bec. C’est plu¬ 
tôt pour les petits et les non- 
fumeurs : apprenez à jouer 
et à composer. Tout ça dans 
une ambiance vachement 
créative, je vous raconte 
pas. Et pour près de 400 F, 
messieurs dames, je vous li¬ 
vre Micro flûte avec, tenez- 
vous bien, dans le paquet : 
une disquette double-face, 
une cassette audio, un ma¬ 
nuel de 12 pages et une 
carte de démarrage. 

Pour le Mac : 

Lisp et Experklt 

Accrochez vos ceintures, on 
entre dans le domaine des 
grosses têtes et autres pro¬ 
ducteurs de jus de crâne. Le 
Lisp est un langage tout en¬ 
tier tourné vers l’intelligence 
artificielle. Ne le troublons 
pas. Dans le genre, c’est 
quasiment ce qu'on fait de 
plus performant pour déve¬ 
lopper des systèmes ex¬ 
perts. Kezako ? Toutes sor¬ 
tes de programmes qui font 
que votre Mac aura une tête 
de prix Nobel. En clair, des 
logiciels intelligents capa¬ 
bles de planifier eux-mêmes 
des tâches ou de contrôler 
des tas de processus. C’est 
édité par ACT et ça coûte 
dans les 4 200 F ht. Les diri¬ 
geants d'ACT ont décidé de 
ne pas s'arrêter en si bon 
chemin. Ils ont dû se dire : 
puisque nous éditons un 
langage artificiellement intel- 
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ligent, profitons-en pour édi¬ 
ter un générateur de systè¬ 
mes experts utilisant ce lan¬ 
gage. Aussitôt dit, aussitôt 
fait : Experkit est né. Com¬ 
mencez à économiser, l’in¬ 
telligence c’est comme le 
diamant artificiel, ça coûte 
cher : 18 000 F ht. (ACT : 12, 
rue de la Montagne Sainte- 
Geneviève, 75005 Paris). 

Ça, ça devrait vous intéres¬ 
ser ! Le Runtime Basic Mi¬ 
crosoft 2.0 est un pro¬ 
gramme permettant de faire 
tourner vos logiciels en Ba¬ 
sic sur Mac sans que l'utili¬ 
sateur ait accès à l’interpré¬ 
teur, c’est-à-dire au listing. 
Le Runtime est donc néces¬ 
saire à tout auteur désirant 
publier ses programmes. Le 
langage est complètement 
masqué et vous récupérez 
17 Ko sur votre disquette. De 
plus, l’ensemble tourne plus 
rapidement que le Basic 
normal. Il vous en coûtera 
3 500 F la disquette Run¬ 
time Mais c’est un bon 
investissement. 


CHEZ 

LE LIBRAIRE 


Découverte et pratique de 
CX Mac Base 

CX Mac Base est à la fois un 
gestionnaire de fichiers, une 
feuille de calculs et il pos¬ 
sède des tas d’autres possi¬ 
bilités comme le tri et le trai¬ 
tement des informations. Or, 
c’est bien connu, un manuel 
aussi beau soit-il laisse tou¬ 
jours derrière lui des zones 
d'ombre. Avec des garçons 
comme Hervé Thiriez, c’est 
tout le boulot annexe qui est 
déblayé magistralement 
apprentissage souple et 
plus rapide. Des exemples 
concrets, avec des possibili¬ 
tés de transposition à vos 
propres problèmes. C'est 
parfait, merci. 


-— découverte et pratique de. _ 

CX MacBase 







HERVÉ THIRIEZ 
£2 Contrôle X 



Hervé Thiriez, Vifi Nathan, 
125 F. 

Les Ecrans de l'Apple 2e 

L’heure est venue de faire 
des économies. Dans le 
genre bouquins benêts et 
niais, ces deux tomes dé¬ 
crochent la palme. Le pre¬ 
mier volume, intitulé Pre¬ 
miers pas en programma¬ 
tion, nous révèle lentement, 
et à grands renforts de pho¬ 
tos d’écrans illisibles, les 
mystères du Basic. Exem¬ 
ple : comment dessiner un 
triangle. Ouh la la, que c’est 
excitant et pédagogique... 
Bon, je passe sur le reste 
parce que sinon je vais de¬ 
venir hargneux. A mon âge 
faut se ménager. 

Phil Robinson, Hachette 
Informatique (2 volumes à 
110 F pièce). 


DESIGN 


Dans la série : « plus moche 
que moi », Segimex vient de 
commercialiser un « espace 
bureau pour Macintosh et 
ses périphériques ». Alors 
moi je veux bien, mais si 
vous trouvez ça beau, je ne 
vous parle plus. C'est peut- 
être fonctionnel mais vous 
avouerez que c'est moche. 
Et puis l'imprimante en hau¬ 
teur, ça ne doit pas être pra¬ 


tique pour visualiser la sortie 
des textes. Enfin, ce que j'en 
dis... Si après ça vous voulez 
vous la payer, ça vaut aux 
alentours de 2 800 F ttc. 


BONNES 

FICELLES 


Pour Apple 2 

Alors là, j'ai la flemme de 
chercher. Je vous donne 
deux trucs de base qui sont 
toujours utiles. D’abord le fa¬ 
meux POKE 214, 128. Cette 
astucieuse instruction pla¬ 
cée dans vos programmes 
Basic (au début de préfé¬ 


rence) a pour effet de voir 
toutes les commandes inter¬ 
prétées comme des RUN. 
Pratique pour éviter le lis¬ 
ting, mais tout de même 
primaire. 

Moins connus, les ennuis 
que l’on peut subir quand on 
veut ouvrir un fichier après 
avoir utilisé un GET. Il arrive 
que dans ce cas précis le 
système se plante ou refuse 
d'ouvrir ledit fichier. Dans ce 
cas, faites suivre votre GET 
d'un PRINT. 

Pour Macintosh 
Un conseil, tout d’abord : ne 
débranchez JAMAIS votre 
lecteur externe lorsque le 
Mac est allumé. Vous ris¬ 
quez de griller la carte mère. 
Du nouveau dans l'éjection 
ultra-rapide de vos disquet¬ 
tes. Commande-A sélec¬ 
tionne le menu de la dis¬ 
quette. Ne lâchez pas la 
touche commande et ap¬ 
puyez sur E. (Ne passez pas 
par la case départ et ne ga¬ 
gnez pas 20 000 F). 

Sur ces entrefaites, je vous 
abandonne à vos claviers et 
vous donne rendez-vous 
dans un mois. J’ai encore 
plein de choses à vous 
raconter. 
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B MSTR AD 

IL FAIT 
L ARTISTE 


S i le père Noël vous a 
apporté un Amstrad 
pour les fêtes, félici- 
tez-le de ma part, il est très 
fort ! Pratiquement tous les 
modèles étaient en rupture 
de stock chez Amstrad 
France, pour le plus grand 
bonheur de quelques impor¬ 
tateurs parallèles, qui n’ont 
d’ailleurs pas hésité à fournir 
leurs machines avec des 
documentations indignes de 
ce nom... Il est étonnant de 
voir qu’une société comme 
Amstrad (devenue leader de 
la micro-informatique fami¬ 
liale en France) méprise à ce 
point sa clientèle française... 
Ca va être dur de rétablir 
une bonne image de mar¬ 
que auprès de la clientèle et 
des revendeurs qui en ont 
ras-le-bol d’attendre leurs 
machines... 

Voici les délais annoncés 
par Amstrad France : 

- CPC 464 et 6128 / DMP 
2000 : premier arrivage fin 
janvier (il n’y en aura pas 
pour tout le monde) puis fin 
février. 

- Disquettes 3« : 50 000 dis¬ 
quettes disponibles fin jan¬ 
vier et en abondance à partir 
du 15 février. 

- FD 2 (deuxième drive pour 
PCW 8256) : quelques uni¬ 
tés fin janvier mais réelle¬ 
ment disponible fin février. 

- Multiplan : fin janvier. 


PÉRIPHÉRIQUES 
ET CIE 


2ème Drive PCW 8256 : il 

s’appelle FD2 et ne coûte 
que 1 990 F. D’une capacité 
de 720 Ko, formaté, il s’ins¬ 
talle sous le premier drive 
de votre PCW (opération ef¬ 
fectuée par votre revendeur) 


et lui donne une capacité de 
stockage enfin adaptée à la 
vocation professionelle du 
PCW. 

Interface série/parallèle 

PCW : 690 F disponible. 
Vous permet d’utiliser l'im¬ 
primante de votre choix sur 
le PCW. Elle autorise aussi 
le transfert de fichiers d’une 
machine à une autre... Très 
utile quand on sait que la 
grande majorité des pro¬ 
grammes disponibles sous 
CP/M sont au format 5 1/4 
pouces. 

Souris AMX : 690 F. 

Disponible. 

Cette petite bébête est enfin 
disponible pour l’Amstrad 
(464/664/6128) et se bran¬ 
che sur la prise poignée de 
jeu. Même si la construction 
de l’animal fait un peu 
« toc », il devient vite un 
compagnon indispensable. 
La souris est livrée avec 4 lo¬ 
giciels sur cassette mais la 


documentation en français 
vous donne la procédure 
pour les transférer sur 
disquette. 

AMX Art : un super logiciel 
de dessin. Menus dérou¬ 
lants, icônes, trames, aéro¬ 
graphe, pinceaux, miroir de 
symétrie, zoom... tout y est. 
Le programme exploite à 
merveille les possibilités 
graphiques de l’Amstrad et 
son utilisation est, pour une 
fois, assez agréable. La pré¬ 
cision de la souris est suffi¬ 
sante pour créer des des¬ 
sins de qualité à condition 
de posséder toutefois quel¬ 
ques dons artistiques. 
Pattern Designer : permet 
de créer des trames person¬ 
nalisées. Elles sont utilisa¬ 
bles par AMX Art. 

Icon Designer : utilitaire de 
création d’icônes sur des 
grilles de quatre caractères, 
soit 16X16 points. Une fois 
sauvegardées, ces icônes 
sont bien sûr utilisables 
dans vos programmes. 

AMX Control : enrichit votre 
Basic de 16 commandes 
dédiées à la gestion de la 
souris, l'affichage des icô¬ 
nes et des fenêtres. Toutes 
les adresses des routines 
ainsi créées vous sont four¬ 
nies de manière à pouvoir 
aussi les exploiter à partir de 
vos programmes en Assem¬ 
bleur. 

En résumé, un très bon pro¬ 
duit (surtout au niveau soft) 
qui offre un rapport quali¬ 
té/prix à la hauteur de la 
gamme Amstrad. 


Extension mémoire PHOE¬ 
NIX M64 : CORE. 650 F 
150 F de câble. Ce produit, 
destiné aux possesseurs de 
464 et 664 un peu à l’étroit 
dans leurs 42 Ko de mé¬ 
moire vive, vous permet 
d’étendre la capacité de vo¬ 
tre machine en lui ajoutant 
64 Ko. Un logiciel sur cas¬ 
sette, fourni avec la carte, 
ajoute au Basic toutes les 
instructions nécessaires à la 
gestion de cet excédent de 
mémoire. Elles sont identi¬ 
ques à celles du 6128 et au¬ 
torisent donc le stockage de 
pages écran et de chaînes 
de caractères comme sur un 
disque mais avec un temps 
d'accès 100 fois plus rapide. 
ATTENTION toutefois ! En 
aucun cas cette extension 
ne donne accès à CP/M et 
donc aux logiciels comme 
Multiplan ou DBase II. 

Vu en Angleterre... 

Les programmes en mé¬ 
moire morte pour l’Amstrad 
se développent... 

Plusieurs constructeurs pro¬ 
posent des cartes mères 
pouvant recevoir jusqu’à 
sept boîtiers de ROM et 
d’EPROM. On peut ainsi ac¬ 
céder instantanément aux 
logiciels qui ont été transfé¬ 
rés sur ce support. Autre 
avantage de cette technique, 
les programmes n’empiètent 
absolument pas sur la mé¬ 
moire vive de votre machine 
qui reste donc disponible 
pour le stockage des don¬ 
nées. Pour l’instant, on 
trouve un assembleur/dé- 
sassembleur, des utilitaires 
disques, un traitement de 
texte, un tableur et un 
agenda. 

Tablette à digitaliser GRAF- 
PAD II. £60 (environ 700 F). 
Cette tablette offre des ca¬ 
ractéristiques à peine croya 
blés vu son prix. Résolution : 
1280 X 1024 pixels / Répé¬ 
tabilité : 1 pixel / 2000 me¬ 
sures X, Y par seconde / 
format A4... ça laisse rêveur... 


CASSETTES, 

DISQUETTES 


Super-Paint : Micro-Appli¬ 
cation. Disquette (395 F), do¬ 
cumentation en français. 
Vous connaissez le Macin- 
tosch et son fameux Mac¬ 
Paint ? 

Les programmeurs de Mi¬ 
cro-Application s’en sont 
tellement inspirés, qu’ils ont 


La souris AMX, un peu fragile, est livrée avec quatre logiciels 
offrant des possibilités Intéressantes, particulièrement pour le 
graphisme. 
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MSTRAD 


repris exactement la même 
présentation d’écran, les 
mêmes icônes... et les mê¬ 
mes fonctions. Là, ils ont fait 
très fort. Pinceaux, brosse, 
aérographe, ciseaux, colle, 
copie et déplacement d’une 
partie du dessin, rotation 
horizontale et verticale, effet 
miroir... J’arrête là mais la 
listeest encore longue IC’est 
sans conteste le plus puis¬ 
sant des logiciels de créa¬ 
tion graphique sur Amstrad. 
Un seul petit regret : même 
si l’utilisation de la souris 
AMX est possible avec Su¬ 
per-Paint son usage reste 
moins agréable qu’espéré... 
Allons, messieurs les pro¬ 
grammeurs, ça ne doit pas 
être bien dur à corriger... 
Programmes au format 3 
pouces sous CP+ : 


risent la saisie et la correc¬ 
tion des données en mode 
pleine page ainsi que leur 
édition sur imprimante dans 
des formats entièrement dé¬ 
finissables par l’utilisateur. 
DBase II a une capacité de 
65 535 enregistrements, 
chaque enregistrement peut 
contenir 32 champs et la 
longueur d’un enregistre¬ 
ment ne doit pas dépasser 
1 000 caractères. Très utilisé 
par les sociétés de service 
en informatique, Base II per¬ 
met de développer rapide¬ 
ment toutes sortes d’appli¬ 
cations : gestion de stock, 
facturation, comptabilité, 
paye, etc. 

La société Hisoft, spéciali¬ 
sée dans les langages de 
programmation, propose 
une solution originale pour 
ses compilateurs en fournis¬ 
sant sur une même dis¬ 
quette un compilateur fonc¬ 
tionnant sous Amsdos et un 
compilateur fonctionnant 
sous CP/M ainsi qu’un édi¬ 
teur de texte assez perfor¬ 
mant : ED80. 

Le premier est livré avec une 
bibliothèque de fonctions 
qui permet d’exploiter les 


Cocktail non limitatif des représentations graphiques de Super- 
Paint. Quatre couleurs peuvent être utilisées simultanément. 


UTILIT. EDIT AIDE FONTE FORME 
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DBase II : La Commande 
Electronique (790 F), docu¬ 
mentation en français. Fonc¬ 
tionne sous CP + . 

DBase II est en fait un lan¬ 
gage de programmation (as¬ 
sez proche du Basic) mais 
possédant des instructions 
de gestion de fichier très 
puissantes tout en restant 
d’un emploi simple. Des 
fonctions spécialisées auto¬ 


taille : les calculs en virgule 
flottante ne sont pas implé¬ 
mentés sur cette version. 
Ceci dit, ce logiciel reste un 
excellent outil d’initiation au 
langage rapide et puissant 
qu'est le C, et qui est amené 
à être de plus en plus utilisé 
dans le monde de l’informa¬ 
tique. 

Compilateur Pascal : Hisoft, 
Disquette (180 F), documen¬ 
tation en anglais. 

Ici, pas de restriction sur les 
virgules flottantes. Comme 
pour le langage C, on peut 
accéder à toutes les fonc¬ 
tions graphiques et sonores 
de l’Amstrad sous Amsdos 
et à la gestion des fichiers 
en accès direct sous CP/M . 
Un compilateur rapide, com¬ 


plet et agréable à utiliser, 
comme tous les produits de 
la société Hisoft. 

CBasic : Digital Research. 
Utilitaire graphique. £50. 
Compilateur Basic : grâce à 
son interface avec l'environ¬ 
nement GSX, autorise enfin 
l'accès aux graphismes 
sous CP/M + . 

DR Draw : Digital Research. 
Utilitaire graphique. £50. 

DR Graph : Digital Research 
.£50. 

Permet d’extraire des don¬ 
nées des tableurs les plus 
répandus et d’en faire des 
représentations graphiques 
sur écran, imprimante ou ta¬ 
ble traçante. 


Grâce à l’interface ORDI 94, vous pourrez enfin utiliser votre 
imprimante sur 8 bits au lieu de 7. Vous tapez un petit pro¬ 
gramme que vous aurez à faire tourner avant votre travail et 
le tour est joué. 
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possibilités graphiques et 
sonores de l’Amstrad. Le se¬ 
cond, sous CP/M autorise, 
quant à lui, la gestion des fi¬ 
chiers à accès direct. 
Compilateur C : Hisoft, Dis¬ 
quette (450 F), documenta¬ 
tion en anglais. 

Assez proche du standard 
de Kernighan/Ritchie, ce 
compilateur possède tout de 
même une restriction de 


Essais sur Hengsler Delta 10. 

Avant 

! ■ MXÎtM ) 1+, -. / 0123456739: ; < = >?@ABCDEF6HIJK 
LMNOPQRSTUVWXYZ[\]V abcdef ghij k1 inop qrst uvh 
xyz{iî 0 t+,-./012345678?i;<=>?8ABC 

DEF&HI J KLtlNOPQRSTUVWXY 2C\1 A _ “abcdef ghijkl ano 
pqrstuvwxyzf!} 

Après 

i H WLl’ ! 5 1 +, -, /G123456739: : <=>?§ABCDEFSHUK 
LMNOPQRSTUVWXY Z C\3 'abcdefghijklmnoporstuvw 

♦ dT : 4 à C FfthI 'Bï±3 x -Âàç t 

â.u B ’i§Ë6ltxy*Âbü4Nfioüfêéùënf ** '«'.."-l IT1UI 
n-rH 
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FICHE PROGRAMME 


SUPER CONCOURS : ÇA ROULE 


V ous êtes super ! Qui a dit que les possesseurs de micros ne les utili¬ 
saient que de façon passive pour jouer ? L’antre de l’équipe du Cahier 
est envahie par vos disquettes et vos cassettes. Il a fallu étayer les éta¬ 
gères pour qu’elles en supportent le poids et allonger nos horaires de travail 
pour tester vos productions. Mais l’ambiance est chaude devant les moniteurs 
et nous, on aime. 

Comme promis, ce mois-ci, déjà huit programmes gagnants. Le choix a été 
difficile et certains programmes, pourtant très bons, ont été écartés au profit 
de programmes encore meilleurs. Ne vous laissez pas aller au désespoir si 
vous n’avez pas été sélectionné, vous gardez toutes vos chances pour les 
prochains numéros puisque tous les programmes reçus restent en course 
jusqu'à la fin du concours. 

Quant à ceux qui peaufinent patiemment leur programme le soir, à la veillée, 
qu’ils n’oublient pas que le temps leur est compté. Il leur reste tout juste un 
peu plus d’un mois. 

Encore un mot pour ceux qui bossent sur Oric : faites au moins un enregistre¬ 
ment en vitesse lente pour que nous puissions vous lire à tout coup. 



[ 



« Ergos » de Patrick Rebout 
et « Écumeurs des 
mers » de Jean-Pierre Fonta. 


REGLEMENT 

1- Micro VO organise un concours de 
programmation ouvert à toute personne 
désireuse d'y participer, dans les condi¬ 
tions définies par le paragraphe 5 du 
présent réglement. 

2- Ce concours a pour objet la concep¬ 
tion et la réalisation par chaque candi¬ 
dat d'un programme informatique, origi¬ 
nal et inédit, ne dépassant pas 15 Ko (15 
000 caractères) de listing, données d’in- 
titialisation comprises. 

Le thème est libre. 

3- Pour participer au concours, il faut 
élaborer un programme en langage Ba¬ 
sic, Assembleur ou langage machine 
pour l’un des micro- ordinateurs sui¬ 
vants, à l’exclusion de tout autre : 
Amstrad. Apple (II, Ile, Ile, Macin¬ 
tosh),Apricot, Atari, 

Canon X 07, Commodore (C64 et 
C128),Exelvision, EXL100, 

IBM PC,Matra Alice,Ordinateurs au 
standard MSX.Oric (Oric 1 et Atmos) 
Sinclair (ZX 81 et Spectrum) Texas Ins¬ 
trument (Tl 99/4A) Thomson (T07, 
TO7-70, M05, T09) 

4- Le concours dure trois mois et porte 
sur la publication des numéros 5, 6 et 7 
de Micro VO, Le concours débute le 1er 
janvier 1986. Il sera clos dix jours après 
la parution de Micro VO N°6. La date 
exacte de clôture sera annoncée dans 
Micro VO N°6. 

5- Les participants au concours devront 
être domiciliés sur le territoire français. 

6- Les participants devront adresser par 
voie postale à Micro VO - Concours Lo¬ 
giciels - 5 rue du Commandant Pilot - 
92522 Neuilly/Seine Cedex 

- la bande magnétique ou la disquette 
servant de support au programme 


- le coupon réponse publié dans le 
« Cahier des logiciels » de Micro VO dû¬ 
ment rempli, 

- une notice expliquant clairement le but 
du programme et ses procédures d'in¬ 
troduction. d'exécution et de listage, 
ainsi que les extensions périphériques 
nécessaires à son exécution 

7- Seront rejetés d'office : 

- les programmes dont la lecture sur les 
ordinateurs mentionnés au 9 3 s'avère 
impossible. 

- les programmes comportant une pro¬ 
tection ou une procédure d'exécution 
rendant difficile leur recopie sur listing 

- les programmes contenant une erreur 
d'exécution 

- les programmes parvenus après la 
date de clôture qui sera annoncée dans 
Micro VO N°6. 

Seront annulés, même après sélection 

- les programmes qui auront fait l’objet 
d'une publication antérieure (presse ou 
édition), 

- les programmes dont le caractère de 
plagiat aura pu être démontré. 

Ces deux conditions annuleraient auto¬ 
matiquement l’attribution éventuelle 
d u. prix. 

8- Seront éliminés d'office, les candi¬ 
dats dont les envois seront adressés 
sous forme recommandée ou insuffi¬ 
samment affranchis. 

- ceux qui déposeront directement leur 
programme à l'adresse indiquée, 

- ceux dont les envois (support magné¬ 
tique, notice explicative et coupon-ré¬ 
ponse) ne porteront pas de façon intelli¬ 
gible le nom du candidat, le nom du 
programme, le nom de la machine à la¬ 
quelle il est destiné. 

9- Chaque mois pendant la durée du 
concours huit loqiciels seroni primés 


Sept logiciels seront sélectionnés sur 
des critères d’originalité et de nouveau¬ 
té du thème développé, de qualité du 
graphisme, d'intelligibilité du pro¬ 
gramme lui-même et de sa notice 
explicative. 

Un huitième programme sera distingué 
pour la qualité technique de sa 
programmation. 

IL NE SERA PRIME CHAQUE MOIS 
QU'UN PROGRAMME PAR MARQUE 
DE MACHINE. 

Les programmes non sélectionnés pour 
un numéro resteront en lice pour le ou 
les numéros suivants. 

10 - L’attribution des lots s'effectuera 
suivant le classement suivant : - deux 
premiers prix, 

- deux deuxièmes prix, 

- quatre troisièmes prix, 

L’un des deux premiers prix distinguera 
obligatoirement le programme retenu 
pour sa technique de programmation. 

11 - Les lots attribués sont : 

- deux micro-ordinateurs Sony Hit Bit 
HB 75F avec drive (lecteur de disquet¬ 
tes) HBD 50 pour les premiers prix, 

- deux imprimantes Epson LX 80 avec 
tracteur pour les seconds prix, 

- quatre moniteurs et interface vidéo Eu¬ 
rêka MC 14 pour le quatrième prix 

Le Jury du concours est composé des 
membres de la rédaction de Micro VOe t 
notamment de l’équipe chargée sous la 
responsabilité de François Dupin de sé¬ 
lectionner les programmes à publier 
dans le « Cahier des logiciels » de Micro 
VO. 

12- Les supports adressés par les candi¬ 
dats à Micro VO en vue de leur partici¬ 
pation au concours ne seront pas resti¬ 
tués. En contrepartie, il sera expédié 
aux candidats un support magnétique 


vierge. 

Les candidats autorisent sans condition 
ni réserve ni contrepartie Micro VO à di¬ 
vulguer leur programme dans la rubri¬ 
que de cette publication, à reproduire 
pour ce faire tout ou partie des docu¬ 
ments transmis, à les réduire et à faire 
mention de leur nom dans ladite 
rubrique. 

13- Les concurrents font élection de do¬ 
micile à l'adresse indiquée par eux sur 
le support et les annexes. 

14- Conformément à l'usage, les mem¬ 
bres du personnel de la société organi¬ 
satrice, ainsi que leur conjoint, parents 
ou alliés vivant sous le même toit ne 
pourront participer au concours. 

15- La participation au concours impli¬ 
que l'acceptation entière et sans réserve 
du présent règlement dans chacune de 
ses dispositions, ainsi que la décision 
des sociétés organisatrices quant à l'in¬ 
terprétation dudit règlement, ou venant 
trancher toute difficulté soulevée par 
son application ou qui n'aurait pas été 
prévue par celui- ci. 

16- Les organisateurs se réservent la fa¬ 
culté de modifier, d'annuler ou de repor¬ 
ter le concours sans que les participants 
puissent élever une contestation de ce 
chef. 

Les organisateurs déclinent toute res¬ 
ponsabilité pour la perte, détérioration 
ou destruction totale ou partielle des 
documents transmis, de même pour 
tout retard de transmission dû aux servi¬ 
ces postaux ou à un cas fortuit. 


17- Le présent règlement est déposé 
chez Maître Henri Augeard, 7 place Félix 
Eboué - 75012 Paris 


Machine: 

Extensions: . 

Cassette □ Disquette □ 

Langage. . 

Programme: ^_,,_,,_ _ _, i _, > _ 11 _ i 

Nom: . 

Prénom:. 

Adresse:. 

Code Postal: .Ville:. 

Tel: Date: / /86 

N’hésitez pas à nous envoyer vos programmes sur support magnétique. Nous vous expédie¬ 
rons en échange une disquette ou une cassette vierge, correspondant à votre expédition. 

Ces disquettes et cassettes vous sont offertes par SCOTCH. 
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Philippe Remondière 
Dix-sept ans et demi. En terminale C 
à Villemonble. Programme depuis 
deux ans. Le programme Fantasia en 
est à sa 31 ème version « et encore, 
c’est pas fini » commente Philippe. 
Après son bac, veut faire de l’écono¬ 
mie puis retourner à l’informatique. 
Pas sportif du tout, Philippe aime la 
lecture, le dessin, le cinéma... et le 
reste comme tout le monde quoi ! A 
laissé tomber le Basic pour l’Assem- 
bleur et veut réaliser des program¬ 
mes de dessins animés. 


P ar un effort d’émulation, ce 
D.A.O. fonctionne avec des fe¬ 
nêtres à la Macintosh. Il est 
composé de deux programmes : tapez 
d’abord le premier (le plus petit), sau- 
vez-le, tapez ensuite le second, sau- 
vez-le à son tour. Rembobinez la cas¬ 
sette puis chargez et suivez les ins¬ 
tructions à l’écran. Fantasia s’utilise 
avec la manette de jeu (interface ZX2) 
ou avec le clavier (touches 1-2-3-4-5). 
En déplaçant un stylo, vous choisissez 
d’abord les couleurs du tracé, du fond 
et du bord. Quand l’écran de dessin 
apparaît, vous tracez des lignes avec 
le joystick ou avec les touches 1-2-3-4. 
Vous pouvez vous déplacer en traçant 
ou sans tracer grâce à la touche « feu » 
ou 5 (appuyer brièvement). On obtient 
un carré plein par les touches P,O ou I. 
Pour obtenir le menu, appuyez sur la 
touche M. Nous ne pouvons en décrire 
toutes les fonctions faute de place 
mais des fenêtres apparaissent judi¬ 
cieusement pour vous guider. Le mode 
graphique du menu appelle cependant 
une remarque : il faut appuyer sur la 
touche V, votre choix fait, pour valider 
ce choix. De même pour sortir du 
mode graphique. Dans ce mode, deux 
curseurs apparaissent à l'écran, pour 
déplacer le plus gros, appuyez sur la 
touche « feu » ou 5 en même temps 
que sur les touches de déplacement 
normales. Un dernier point : après 
avoir tapé le programme, il est néces¬ 
saire de faire GOTO 9021. ■ 


Philippe REMONDIERE 


10 BORDER 0: PAPER 0: INK 4: C 
LS : CLS 

20 FOR 4=0 T0 18 

21 PRINT AT f.0: INK <4/3> + l:* 

ARRETEZ LA BANDE' 

25 BEEP 0.01.F 
30 NEXT F 

40 PRINT AT 21,0;'APPUYEZ SUR 
UNE TOUCHE' 

45 BEEP 0.1,10 
47 FOR f=0 T0 50: NEXT f 
50 PAUSE 0 
60 CLS 

70 PRINT 'POSSEDEZ-VOUS UNE IN 
TERFACE ZX 2 ? (0/M)“ 

75 BEEP 0.1.10 

77 FOR 4=0 T0 50: NEXT f 

78 PAUSE 0 

B0 IF INKEY$='0' OR 1NKEY$=V 
THEN GO T0 90 

85 IF INKEY$=*n" OR INKEY$="N‘ 
THEN 60 T0 110 
87 G0 TO 80 

90 PRINT ‘L’avez-vous branche 
? (o/n) ' 

92 FOR 4=0 T0 50: NEXT 4 

94 BEEP 0.1,10: BEEP 0.1,20 

95 PAUSE 0 

100 IF INKEY$=“0' OR INKEY»=*o' 
THEN 60 T0 110 

105 IF INKEY$='n* OR INKEY$='N* 
THEN PRINT 'Il 4aut oue vous sa 
chiez que ce prograiie s’utilise 
avec la eanette. Il serait pre4 
erable que vous la branchiez. (E 
teignez tout et rechargez apres 
l’avoir branche' 

110 PRINT 'Possedez-vous une il 
priiante ? (o/n)' 

112 FOR 4=0 T0 50: NEXT 4 

114 BEEP 0.1,10: BEEP 0.1,20 

115 PAUSE 0 

120 IF INKEY»='o* OR INKEY$='0* 
THEN 60 T0 130 

125 IF INKEY$='n* OR INKEY$='N* 


THEN 60 T0 160 

130 PRINT 'L’avez-vous branchée 

? (o/n) ' 

131 FOR 4=0 T0 50: NEXT 4 

132 BEEP 0.1,10: BEEP 0.1.20 

135 PAUSE 0 

140 IF INKEY$='o* OR INKEY$="0' 

THEN 60 T0 160 

150 IF INKEY»='n* OR INKEY$='N* 

THEN PRINT ‘Si vous avez l’inte 
ntion de vous en servir, lieux v 
aut la brancher. Eteignez votre 
Spectrui, brancez l’iipmante e 
t rechargez tout.' 

160 PRINT 'Reiettez le lagnetop 
hone en lar-che. Fantasia va se 
charger. Bon dessin !" 

170 L0AD “ 


1 REN FANTASIA UTILITAIRE DE 

2 REH DESSIN CREE PAR 

3 REH PHILIPPE REH0NDIERE 

10 FLASH 0: INVERSE 0: BRIGHT 
0: 0VER 0: BORDER 0: PAPER 0: IN 


K 4: 

CLS 


15 

60 SUB 8500 


16 

CLS : CLS 


17 

LET xx=127: LET yy=87 


18 

LET xa=120: LET ya=80 


20 

LET a=l 


30 

LET x=2: LET y=173 


109 

T 

REH NON INSCRIPTION DU P0IN 

1 

110 

INK E: PLOT x,y 


120 

IF INKEY$="2' THEN PLOT 

INV 

ERSE 

l;x,y: LET x=x+a 


121 

IF x>254 THEN LET x=x-a 


122 

IF x<l THEN LET x=x+a 


123 

IF y<l THEN LET y=y+a 


124 

IF y>174 THEN LET y=y-a 


140 

IF INKEY$=‘1‘ THEN PLOT 

INV 

ERSE 

l;x,y: LET x=x-a 


160 

IF INKEY*='4' THEN PLOT 

INV 
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ERSE l;x,y: LET y=y+a 
180 1F INKEY$='3‘ THEN PLOT INV 
ERSE 1 ;x,y: LET y=y-a 

195 1F (INKEY$="p' OR INKEY$='P 
■) THEN PRINT AT INT <21-y/8),IN 
T (x/8); OVER 1; INVERSE 1;* ': 
OVER 0: INVERSE 0 

196 IF (INKEY$='o‘ OR INKEY*='0 
*) THEN PRINT AT INT (21-y/8),IN 
T (x/8); OVER 1; INVERSE 1;'|||': 

OVER 0: INVERSE 0 

197 IF (INKEY$=V OR INKEY$='H 
■) THEN GO SUB 400 

198 IF (INKEY$=V DR INKEY$='I 
■) THEN PRINT AT INT (21-y/8),IN 
T (x/8); OVER 1; INVERSE l;'!*: 

OVER 0: INVERSE 0 
200 IF INKEY$=‘5* THEN BEEP 0.1 
,0: 60 TO 2000 

202 IF INKEY$="j* OR INKEY*="J" 
THEN GO SUB 6000 

205 IF X+a>255 THEN LET X=X 

206 IF X-a<0 THEN LET X=X 

207 IF Y-a<0 THEN LET Y=Y 

208 IF Y+a>175 THEN LET Y=Y 
300 GO TO 110: REH FIN NON INSC 

RIPTION 

400 REH AUTRE POSSIBILITES 
410 RANDOHIZE USR 57000 
420 FOR f=5 TO 20 
425 PRINT AT 4,5; PAPER 2; INK 
6;* *: NE 

XT 4 

430 INK 6: PLOT 518,B: DRAW 192 
,0: DRAM 0,127: DRAN -192,0: DRA 
N 0,-127 

435 PRINT AT 6,6; PAPER 0; INK 
4;"6..HODE GRAPHIQUE*; AT 8,6; IN 
K 4;*Q..COPIER L’ECRAN"; AT 10,6; 

INK 4;*R..RECOMMENCER*; AT 12,6; 
INK 4;'S..SAUVER L’ECRAN'; INK 
4 ; AT 14,6;‘L.. LOAD ""SCREEN$ 

* ; AT 16,6;"C..CHAN6EHENT COULEUR 
S' 

436 PRINT AT 18,6; PAPER 0; INK 
4;*E..AUTRE ECARTEHENT* 

500 IF (INKEY$=‘q“ OR INKEY*=*Q 
*) THEN RANDOHIZE USR 57012: PRI 
NT fl; 1 ': CO 

PY : CLS : RANDOHIZE USR 57012: 
RETURN 

510 IF IINKEY$='c" OR INKEY$='C 
') THEN 60 SUB 7000: RANDOHIZE U 
SR 57012: RETURN 
520 IF (INKEY$=* 1 * OR INKEYM'L 
') THEN INPUT 'Dessin a charger' 

, LINE a$: LOAD atSCREEN* : RAND 
OHIZE USR 57000: RETURN 


530 IF (INKEYI='s" OR 1NKEY$='S 
') THEN PLOT INVERSE l;x,y: RAND 
OHIZE USR 57012: 60 SUB 8000: RE 
TURN 

560 IF <INKEY$=*r' OR INKEY$=*R 
') THEN CLS : RANDOHIZE USR 5700 
0: 60 TO 8500 

570 IF <INKEY*='e' OR 1NKEY$='E 
') THEN 60 SUB 3000: RANDOHIZE U 
SR 57012: RETURN 

580 IF (INKEYf='6‘ OR INKEY$='g 
') THEN 60 SUB 4000: RETURN 


590 

60 

TO 500 


2000 

REH 

1 INSCRIPTION 


2010 

INK 

: E: PLOT x,y 


2020 

IF 

INKEY$='2' THEN LET x 

=x + 

â 

2021 

IF 

x+a>254 THEN LET x=x 


2022 

IF 

x-a<l THEN LET x=x 


2023 

IF 

y-a<1 THEN LET y=y 


2024 

IF 

V+a>174 THEN LET y=y 


2040 

IF 

INKEY»=*P THEN LET x 

=x- 

à 

2060 

IF 

INKEY$='4‘ THEN LET y 

=y+ 

d 

2070 

IF 

(INKEY$=*p‘ OR INKEY1 

=*P 

') THEN 

PRINT AT INT (21-y/8) 

, IN 


T (x/8); OVER 1; INVERSE 1;' ': 

OVER 0: INVERSE 0 

20B0 IF INKEY$='3* THEN LET y=y- 

a 

2081 IF (INKEY4='o* OR INKEY$='0 
') THEN PRINT AT INT (21-y/B),IN 
T (x/8); OVER 1; INVERSE 1;’|||': 
OVER 0: INVERSE 0 

2092 IF (INKEY$='i“ OR INKEY$='I 
') THEN PRINT AT INT (21-y/8),IN 
T (x/8); OVER 1; INVERSE l;'if: 

OVER 0: INVERSE 0 

2093 IF (INKEY$=“«* OR INKEY$=*H 
') THEN 60 SUB 400 

2095 IF 1NKEY$="5" THEN BEEP 0.1 
,0: 60 TO 100 

2096 IF X>255 THEN LET X=X-A 

2097 IF X<0 THEN LET X=X+A 

2098 IF Y<0 THEN LET Y=Y+A 

2099 IF Y>175 THEN LET Y=Y-A 

2100 1F INKEY*='J' OR INKEY»='j' 
THEN 60 SUB 6000 

2110 60 TO 2010: REH FIN INSCRIP 
T10N 

3000 FOR 4=3 TO 8: PRINT AT 4,8; 
INK 7; PAPER 2; 1 'MHftÜHKKI 

3010 PRINT AT 4,9; PAPER 7; INK 
0;*Entrez le chi44re*; 

3020 PRINT AT 5,9; PAPER 7; INK 
0;'Correspondant au*; 


»■ 


3025 PRINT AT 6,9; PAPER 7; INK 
0;"Nouvel ecarteient'; 

3030 PRINT AT 7,9; PAPER 7; INK 
0;'Entre 2 points...'; 

3040 INPUT a 

3999 RETURN 

4000 REH HODE 6RAPHIQUE 

4020 FOR 4=21 TO 6 STEP -1: PRIN 
T AT 4,1; PAPER 7; INK 0;' 

': NEXT 4 

4030 PLOT 8,0: INK 2: DRAW 183,0 
: DRAN 0,127: DRAN -183,0: DRAN 
0,-127: INK 0 

4035 PRINT AT 20,2; PAPER 7;*C:C 
ERCLE' 

4040 PRINT AT 18,2; PAPER 7;'B:B 
DITE' 

4045 PRINT AT 16,2; PAPER 7;'D:D 
ROITE' 

4046 PRINT AT 14,2; PAPER 7;'H:H 
ENU' 

4047 PRINT AT 12,2; PAPER 7;'S:R 
ETOUR HODE NORHAL' 

4048 PRINT AT 10,2; PAPER 7;“V:V 
ALIDER LE CHOIX' 

4049 PRINT AT 8,2; PAPER 7;" 

4050 IF 1NKEY$='C' OR !NKEY$='c' 
THEN LET gsb=4800: FOR 4=0 TO 5 

: PRINT AT 4,21; PAPER 7; INK 0; 
' ': NEXT 4: PLOT 168,1 

75: INK 2: DRAN 79,0: DRAN 0,-47 
: DRAN -79,0: DRAN 0,47: INK 0: 
PAPER 7: PRINT AT 1,22;'+=CENTRE 
';AT 3,22;*.=RAY0N' 

4060 IF INKEY$='B' OR INKEY$=*b‘ 
THEN LET gsb=4700: FOR 4=10 TO 
17: PRINT AT 4,20; PAPER 7; INK 
0;' ': NEXT 4: PLOT 1 

60,95: INK 2: DRAN 95,0: DRAN 0, 
-63: DRAN -95,0: DRAN 0,63: INK 
0: PAPER 7: PRINT AT 11,21;'+ et 
.*;AT 12,21;'4onent la';AT 13, 
21;'diagonale';AT 14,21;'de la ' 
; AT 15,21;'boite.* 

4065 IF INKEY$='D‘ OR lNKEY*='d' 
THEN LET gsb=4600: FOR 4=5 TO 1 
2: PRINT AT 4,10; PAPER 7; INK 0 
': NEXT 4: PLOT 
80,136: INK 2: DRAN 111,0: DRAN 
0,-63: DRAN -111,0: DRAN 0,63: I 
NK 0: PAPER 7: PRINT AT 6,11;'+ 
et .'; AT 7,ll;'4or«ent les';AT 8 
,11;"2 extre«ites';AT 9,11;'de 1 
a ';AT 10,11;'droite.' 

4070 IF INKEY»='S' OR INKEY$='s' 
THEN RANDOHIZE USR 57012: PAPER 
p: RETURN 

4080 IF INKEY$='H' OR INKEY*=V 












THEN 60 T0 4010 

4090 IF INKEY$='V* OR INKEY»= , v 1 
THEN 60 TO 4101 

4100 60 TO 4050 

4101 LET z=IN 63486 
4105 RANDOHIZE USR 57012 

4108 LET Z=IN 63486: IF Z<230 TH 
EN LET Z=Z+64 

4200 INK E: PLOT XX,YY 

4201 INK E: PLOT XA.YA+2: DRAN 0 
.-4: PLOT XA-2.YA: DRAN 4,0 
4430 LET Z=IN 63486: IF Z<230 TH 
EN LET Z=Z+64 

4435 PLOT xa,ya+2: DRAN 0,-4: PL 
OT xa-2,ya: DRAN 4,0: PLOT xx,yy 
4440 IF z=247 THEN PLOT INVERSE 
1 ;xx,yy: LET yy=yy+l 
4450 IF z=251 THEN PLOT INVERSE 
ljxx,yy: LET yy=yy-l 
4460 IF z=253 THEN PLOT INVERSE 
l:xx,yy: LET xx=xx+l 
4465 IF z=254 THEN PLOT INVERSE 
l;xx,yy: LET xx=xx-1 
4470 IF i=2ll THEN PLOT INVERSE 
1 ;xa,ya+2: DRAN INVERSE 1:0,-4: 
PLOT INVERSE l;xa-2,ya: DRAN 1NV 
ERSE 1 ;4,0: LET xa=xa+l 
4480 IF z=23B THEN PLOT INVERSE 
1;xa,ya+2: DRAN INVERSE l;0,-4: 
PLOT INVERSE l;xa-2,ya: DRAN INV 
ERSE 1;4,0: LET xa=xa-l 
4500 1F z=235 THEN PLOT INVERSE 
1 ;xa,ya+2: DRAN INVERSE l;0,-4: 
PLOT INVERSE l;xa-2,ya: DRAN INV 
ERSE 1 ;4,0: LET ya=ya-l 
4510 IF z=231 THEN PLOT INVERSE 
1 ;xa,ya+2: DRAN INVERSE l;0,-4: 
PLOT INVERSE l;xa-2,ya: DRAN INV 
ERSE 1 ;4,0: LET ya=ya+l 
4520 IF INKEY»=V OR INKEY*=“S" 
THEN INK e: PAPER p: RANDOHIZE 
USR 57012: 60 TO 100 
4525 IF INKEY»=V OR INKEY*="V 
THEN 60 SUB gsb 

4527 IF INKEY*=V OR INKEY*='H* 
THEN 60 TO 4010 

4529 LET Z=IN 63486: IF Z<230 TH 
EN LET Z=Z+64 

4530 60 TO 4200: REM 4430 
4600 REM DROITE 

4615 RANDOHIZE USR 57012 
4620 INK E: PLOT xx,yy: DRAN xa- 
xx,ya-yy 

4625 RANDOHIZE USR 57000 

4699 RETURN 

4700 REM BOITE 

4715 RANDOHIZE USR 57012 
4720 INK E: PLOT xx,yy: DRAN xa- 


xx,0: DRAN 0,ya-yy: DRAN -(xa-xx 
),0: DRAN 0,-(ya-yy) 

4725 RANDOHIZE USR 57000 

4750 PRINT AT 0,0; PAPER 1; INK 
7;* VOULEZ-VOUS PEINDRE CECI 7(0 
/N)“ 

4751 IF INKEY$="0‘ OR INKEY*=‘o* 
THEN RANDOHIZE USR 57012: 60 TO 

4754 

4752 IF INKEY$=“n’ OR INKEY$=“N* 
THEN RANDOHIZE USR 57012: RETUR 

N 

4753 60 TO 4751 

4754 IF (xx-xa)<0 THEN 60 TO 475 
6 

4755 60 TO 4760 

4756 FOR T=xx TO xa: PLOT f,yv: 
DRAN 0,(ya-yy): NEXT (: RANDOHIZ 
E USR 57000: RETURN 

4760 FOR f=xa TO xx: PLOT f.yy: 
DRAN 0,(ya-yy): NEXT f: RANDOHIZ 
E USR 57000: RETURN 

4799 RETURN 

4800 REH CERCLE 

4815 RANDOHIZE USR 57012 
4820 INK E: CIRCLE xa,ya,SQR ((x 
a-xx)I(xa-xx)+(ya-yy)*(ya-yy)) 
4825 RANDOHIZE USR 57000 

4827 PRINT AT 0,0: PAPER 1; INK 
7;"VOULEZ-VOUS PEINDRE CECI 7(0/ 
N)' 

4828 IF INKEY$=*o‘ OR INKEY*=“0" 
THEN RANDOHIZE USR 57012: 60 TO 
4831 

4829 IF INKEY*=*n* OR INKEY»= , N* 
THEN RANDOHIZE USR 57012: RETUR 

N 

4830 60 TO 4828 

4831 60 TO 4833: IF (xx-xa)<0 TH 
EN 60 TO 4833 

4832 REH goto 

4833 LET re=INT (S8R ((xa-xx)l(x 
a-xx)+(ya-yy)I(ya-yy))) 

4834 FOR 4=(xa-re)+l TO INT (xa+ 
re+0.5) 

4835 PLOT f,ya: DRAN 0,S8R (ABS 
<(re)t(re)-((f-xa)*U-xa)>)> 

4836 PLOT F,ya: DRAN 0,-SQR (ABS 
((re)l(re)-Kf-xa)Kf-xa)))) 

4837 NEXT I 

4848 RANDOHIZE USR 5700U 

4899 RETURN 

4990 STOP : LIST 4000 

4999 RETURN 

6000 REH OPTION JUMP 

6005 PLOT INVERSE l;x,y 

6010 RANDOHIZE USR 57000 

6020 FOR F=0 TO 21 STEP 2: PRINT 


OVER 1; AT T,0; PAPER 7; INK 0;“ 


Z Z Z Z AT T+1,0; OVER 1; 
PAPER 6; INK 0;' Z Z Z Z Z I 
ZZZZZZZZZZ": N 
EXT f 

6025 PLOT PAPER 8; INK 0;X,Y 

6040 IF INKEY$=‘2' THEN PLOT INV 

ERSE 1 ;X,Y: LET X=X+A 

6050 IF INKEY$= , 1 1 THEN PLOT INV 

ERSE 1 ;X,Y: LET X=X-A 

6060 IF INKEY$= , 3 1 THEN PLOT INV 

ERSE 1 ;X,Y: LET Y=Y-A 

6070 IF INKEY$='4" THEN PLOT INV 

ERSE 1 ;X,Y: LET Y=Y+A 

6080 IF INKEY*=*5‘ THEN RANDOHIZ 
E USR 57012: RETURN 

6081 IF x+a>255 THEN LET x=x-a 

6082 IF x-a<0 THEN LET x=x+a 

6083 IF y-a<0 THEN LET y=y+a 

6084 IF y+a>175 THEN LET y=y-a 
6090 60 TO 6025 

7000 REH CHAN6EHENT DE COULEUR 
7150 FOR T=0 TO 14 
7160 PRINT AT T.15; INK 6; PAPER 
1;’ ‘: NEXT T 

7165 INK 6: PLOT 15*8,817: DRAN 
INK 6:1618+7,0: DRAN 0.8114+7: D 
RAN -(1618+7),0: DRAN 0,-(8*14+7 
) 

7170 FOR t=0 TO 7: PRINT AT 3,16 
+t; INK 7: PAPER tî’Z 1 : NEXT t 
7180 FOR t=0 TO 7: PRINT INK 7;A 
T 6,16+t; PAPER t;“Z": NEXT t 

7185 PRINT AT 3,25; PAPER 0; INK 
5;'PAPIER*;AT 6,25;'ENCRE" 

7186 PRINT AT 9,25; PAPER 7; INK 
li'iriia'jAT 11,25; PAPER 7; I 

NK 1; ■HŒ' 

7187 PRINT INK 4; PAPER 0;AT 9,2 
4; ' ■* ; AT 11,24; 1 ■ * 

7190 LET t=5: LET u=16 

7199 REM PAPIER 

7200 PRINT INK 6; PAPER 1;AÎ t,u 
; " IJ ‘ ; AT t-l,u;*A' 

7210 IF INKEY$=*2‘ THEN BEEP 0.0 
1,t-u: PRINT AT t,u; PAPER 1; IN 
K 6; 1 * ; AT t-l,u;" *: LET u=u+l 
7220 IF INKEY*=‘l* THEN BEEP 0.0 
l,u: PRINT AT t,u; PAPER 1; INK 
6;* ";AT t-l,u;" ": LET u=u-l 
7223 IF INKEY$=“4" THEN BEEP 0.0 
l,t: PRINT AT t,u; PAPER 1: INK 
6; 1 ";AT t-l,u;‘ *: LET t=t-l: L 
ET p=u-16: FOR f=154 TO 157: PRI 
NT AT t-l,u; INK 6; PAPER 0; FLA 
SH ljCHR* T: BEEP 0.1,(f-150)*2: 
NEXT T: LET t=8: LET u=16: 60 T 
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0 7228 

7225 IF u<16 THEN LET u=23 

7226 IF u>23 THEN LET u=16 

7227 60 T0 7200: REH /ENCRE 

7228 PAPER p: PRINT INK 6; PAPER 
I ; AT t,u; ‘U’jAT t-l f u] a A a 

7229 IF INKEY$="2* THEN BEEP 0.0 
1,t-u: PRINT AT t,u; PAPER 1; IN 
K 6;* “; AT t-l.uj* ": LET u=u+l 

7230 IF INKEY$s*l“ THEN BEEP 0.0 
l,t: PRINT AT t,u; PAPER 1; INK 
6"; AT t-l,u;* ": LET u=u-l 

7231 IF INKEY*="4' THEN BEEP 0.0 
1,u: PRINT AT t,u; PAPER 1; INK 
6;‘ ";AT t-l,uj" ": LET t=t-l: L 
ET e=u-16s FOR f=154 TO 157: PRI 
NT AT t-l,u; INK 6; PAPER 0: FLA 
SH 1;CHR* T: BEEP 0.1,((-150)12; 

NEXT (: 60 TO 7240 

7232 IF u<16 THEN LET u=23 

7233 IF u>23 THEN LET u=16 

7234 60 TO 7228 

7240 INK E: LET t=9: LET u=20 

7241 PRINT INK 6; PAPER 1;AT t,u 
î'c'jAT t,u+l;‘>‘ 

7242 IF INKEY$='2" THEN PRINT AT 
t,u; PAPER 1; INK 6;‘ ";AT t,u+ 

1;* ■: LET u=u+l 

7243 IF INKEY$="1* THEN PRINT AT 
t,u; PAPER 1; INK 6;“ •;AT t,u+ 

1;* ■: LET u=u-l 

7244 IF INKEY$="4" THEN PRINT AT 
t,u; PAPER 1; INK 6;" " ; AT t,u+ 

1;' *: LET t=t-l 

7245 IF INKEY$="3" THEN PRINT AT 
t,u; PAPER 1; INK 6;" *;AT t,u+ 

lï" LET t=t+l 

7246 IF u<20 THEN LET u=u+l 





Langage : Basic 


Jean-Pierre Fonta 

Il aura vingt et un ans en novembre. 
Actuellement à l’armée à la base aé¬ 
rienne de Nîmes après avoir passé un 
Bac F3 (électro-technique). Passion¬ 
né d’électronique, Jean-Pierre aime¬ 
rait faire carrière dans la mainte¬ 
nance, en tout cas il ne lâchera pas 



7247 IF u>23 THEN LET u=u-l: 60 
T0 7251 

7248 IF t<9 THEN LET t=t+l 

7249 IF t>ll THEN LET t=t-l 

7250 60 T0 7241 

7251 IF (t=10) THEN 60 T0 7250 

7252 FOR (=154 T0 157: PRINT AT 

t,u+1; INK 6; PAPER 0; FLASH 1;C 


LINE z* 

9010 SAVE z$ LINE 9020 
9012 SAVE z4C0DE 50000,6912 
9015 STOP 

9020 BORDER 0: PAPER 0: INK 0: C 
LS : L0AD "CODE 50000 
9030 FOR (=57000 TO 57037: READ 
a: POKE (,a 


HR* f: BEEP 0.1,((-150)12: NEXT 
( 

7260 IF t=9 THEN 60 TO 7150 

7998 RANDOHIZE USR 57012 

7999 RETURN 

8000 REM SAVE SCREEN* 

8010 INPUT ‘Noa du dessin:"; LIN 
E n* 

8020 1F LEN n*>10 OR LEN n*<l TH 
EN 60 TO 8000 
8030 SAVE n*SCREEN* 

8040 RETURN 

8500 REH PRESENTATION 

8501 CLS 

8502 RANDOHIZE USR 57024 

8503 PRINT AT 20,5; PAPER 1; INK 
7;"APPUYEZ SUR UNE TOUCHE" 

8504 PAUSE 0 

8505 60 SUB 7000 

8600 PRINT AT 21,0;"ENTREZ LA CO 
ULEUR DU BORD": INPUT bord 
8610 PRINT AT 21,0;"ENTREZ LA CO 
ULEUR DU PAPIER ": INPUT papi 
er 

8630 BORDER bord: PAPER papier: 


9031 DATA 33,0,64,17,64,156,1,0, 
27,237,176,201,33,64,156,17,0,64 
,1,0,27,237,176,201,33,80,195,17 
,0,64,1,0,27,237,176,201,176,201 

9032 NEXT ( 

9033 RESTORE 9035 

9035 FOR (=0 TO 167: READ a: POK 
E (65368+0,a 

9040 DATA 255,129,129,129,129,12 
9,129,255,16,16,56,40,124,84,76, 
76,76,76,76,76,76,56,0,0,255,137 
,186,154,186,138,255,0,255,152,1 
70,154,154,168,255,0,255,157,173 
,157,159,173,255,0,255,158,177,1 
49,181,149,255,0,255,63,73,75,91 
,75,255,0,0,0,63,64,64,127,63,0, 
0,0,240,28,23,156,240,0,0,0,0,24 
,24 

9050 DATA 0,0,0,0,0,24,36,36,24, 
0,0,0,60,66,90,90,66,60,0,126,12 
9,153,165,165,153,129,126,16,16, 
16,16,16,84,40,16,8,4,2,255,2,4, 
8,0,16,56,84,146,16,16,16,16,16, 
32,64,255,64,32,16,0,85,85,85,85 
,85,85,85,85,85,170,85,170,85,17 


CLS : CLS 

8640 CLS : RANDOHIZE USR 57000 
8950 RETURN 


0,85,170,0,66,66,66,66,66,60,0 
9051 NEXT ( 

9999 60 TO 1 


8951 REH FIN DU PR06RAHHE 



9000 INPUT "Noa du prograaae:'; 


JEAN-PIERRE FONTA 
GAGNE 

UNE IMPRIMANTE 
EPSON LX80 


l’électronique de sitôt. A programmé 
des dizaines de jeux pour ses petits 
frères et ses petits neveux. Reçoit 
les conseils éclairés de son père - re¬ 
traité - en matière de gestion et de 
comptabilité. 


B arbe-Houge, l’île de la Tortue, 
des pirates ivres de rhum, la 
tempête et les mers du sud... 
L’épopée des boucaniers comme si 
vous y étiez. Ce jeu est prévu pour 
deux joueurs : chacun est capitaine 
d'un navire pirate qu'il doit manœuvrer 
entre des îles. Il doit tenir compte de la 
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météo : en cas de gros vent, il faut 
éviter de mettre trop de voilure. Quand 
les deux navires sont en vue l’un de 
l’autre, il leur est possible de tirer au 
canon. Si les dégâts sont importants, il 
faut alors repartir vers la base de 
départ pour réparer. Les règles sont 
données en début de jeu. ■ 


Jean-Pierre FONTA 


10 CLEAR2000:KEYOFF:60SUB8700:60SUB9500: 
C0L0R7,13:SCREENO:60T090 
20 FOR1=OT034STEP2 

30 LOCATEI,0:PRINTCHRi(208);CHR$(207) 

40 LOCATEI,22:PRINTCKR*(20B);CHR$(207) 

50 IFD22THEN80 

60 L0CATE0,1:PRINTCHR*(208);CHR*(207) 

70 L0CATE34,1 :PRINTCHR4(208);CHR$(207) 

80 NEXTI:RETURN 

87 ’ 

88 ’ présentation des joueurs 

89 ’ 

90 F0RII=1T02:CLS:60SUB20 

95 IFII=lTHENA$='blanc'ELSEA$='noir' 

100 L0CATE10,3:PRINT'CAPITAINE No*;II 
110 L0CATE9,6:PRINT’Votre no«:■;L0CATE9, 
7:INPUTNN$(II) 

120 L0CATE9,10:PRINT*No« de votre navire 

130 L0CATE9,11: INPUTNNKII) 

140 L0CATE6,15;PRINT'Repere du navire:'; 

A* 

150 K$=INKEY$: IFK$="THEN150 
155 NEXTII 

157 ’ 

158 ’ présentation des navires 

159 ’ 

160 CLS:CDL0R7,4:60SUB20 

170 L0CATE10,3:PRINT"Navires utilises:' 
180 L0CATE9,9:PRINT'Ce sont des frégates 

190 L0CATE9,11:PRINT*Volu*e: 600 tonneaux 

■ 

200 L0CATE9,13:PRINT*Equipage: 250 houes 
■ 

210 L0CATE9,15:PRINT“Arie*ent:50 canons" 
220 L0CATE9,17:PRINT'Vitesse Naxi:15 noe 
uds" 

230 K$=INKEY«: IFK*="THEN230 

237 ’ 

238 ’ «enu l(au port) 

239 ’ 

240 CLS:C0L0R3,4,1 :SCREEN2,2:OPEN'GRP:'F 
OROUTPUTASI1 : G0SUB9000:CLS 

250 F0RJ=1T02:60SUB2500 

260 IFJ=1ANDX 11 ) < >70RJ=1ANDY ( 1 ) O7THEN50 

0 

270 IFJ=2ANDX(2)<>2160RJ=2ANDY(2)<>174TH 
EN500 

275 CLS:C0L0R3,4,1 

280 PSET(20,5) ,4:PRINTil,'On est ancre 
1’ile':PSET(20,15),4:PRINTil,ILE*(J) 


290 PSETI20,25),0:PRINTI1,'CAPITAINE *;N 
N$(J) 

300 C0L0R11,4,1:PSET<30,401,4:PRINTil,'Q 
ue voulez-vous faire?' 

310 C0L0R7,4,1:PSET(10,60),4:PRINTil,'1- 

Lever l’ancre" 

320 PSET(10,70),4:PRINTil,'2-Voir 1’état 
du navire' 

330 PSET(10,80),4:PRINTil,'3-Connaitre 1 
a «eteo* 

340 PSET(10,90).4:PRINTI1."4-Voir la car 
te marine* 

350 PSET(10,100),4:PRINTil,"5-Voir les r 
eserves" 

360 CGL0R11,4,1:PSET(60.130),4:PRINTil,' 
Votre choix 7 ' 

365 PUTSPRITE1,(200,140),C<J),1 :PUTSPRIT 
E2,(200, 156),C(J),2 :PUTSPRITE3,(216,140) 

,C(J),3:PUTSPRITE4,(216,156),C(J) ,4 
370 K$=INKEY$:IFK4= * *THEN370 
380 BEEP:CX=VAL(KI):IFCX<10RCX>5THEN370 
390 0NCX60T010O0 

400 0NCXG0SUB,3500,4000,3000,5000 
410 G0T0275 

497 ’ 

498 ’ menu 2(en «er) 

499 ’ 

500 CLS:C0L0R3,4,1:LI(J)=0 

510 PSET(20,5),4:PRINTI1,NNI(J) 

515 PSET(20,15),4:PRINTil,'est en pleine 

mer' 

520 PSET(20.25),4:PRINTI1,'CAPITAINE ';N 
NKJ) 

530 C0L0R11,4,1 :PSET(30,40),4:PRINTil,'fl 
ue voulez-vous faire?* 

540 C0L0R7.4,1 :PSET(10.60),4:PRINTil,“1- 
Nanoeuvrer' 

550 PSET(10,70),4:PRINTil,"2-Voir l’etat 
du navire" 

560 PSET(10,80),4:PRINTil,'3-Connaitre 1 

a aetea' 

570 PSETtt'' 90),4:PRINTI1,"4-Voir la car 
te marine' 

580 C0L0R11,4,1:PSET(60,130),4:PRINTil,' 
Votre choix?' 

590 PUTSPR I TE 1, ( 2u, 140), C ( J ). 1 : PUTSPRIT 
E2,(200,156),C(J),2:PUTSPRITE3,(216,140) 

,C(J),3:PUTSPRITE4,(216,156),C(J),4 

600 K$=INKEY$:IFK$=''THEN600 

610 BEEP:CX=VAL(K$):IFCX<10RCX>4THEN600 

620 ONCXGOTO1000 

630 0NCX60SUB,3500,4000,3000 

640 60T0500 

997 ’ 

998 ’ manoeuvres du navire 

999 ’ 

1000 CLS:C0L0R7,4,1 

1010 PSET(10.8),0:PRINTil,'LE TIMONIER D 
EMANDE:" 

1020 PSET(10,16),0:PRINTil,'CAP a suivre 
capitaine!' 

1023 PUTSPRITE1,(200,40),C(J),1 :PUTSPRIT 


E2, (200,56),C(J),2:PUTSPRITE3, (216,40),C 
(J),3:PUTSPR1TE4,(216,56),C(J),4 
1025 CIRCLE(90,90),60, 13,0,6.28,1.3:PA IN 
T(90,90),13 

1030 CIRCLE(90,90),50,7,0,6.28,1.3:RESTO 

RE 1060:C0L0R7,4,1 

1040 FORI=1T08:READAi,X,Y 

1050 PSET(X,Y),0:PRINTil,A$:NEXTI 

1060 DATAE,120,90,NE,106,60,N,90,46,NO.6 

4.60,0,56,90,S0,62,115,S,90,130,SE,105,1 

15 

1080 RESTORE 1260 

1090 F0RI=1T0AR(J):READX,Y,B,S(J):NEXTI 

1100 LINE(90,90)-(X,Y),7 

1200 A=STICK(0):B=STRIG(0):REST0RE1260 

1210 1 FA=5THENL I NE (90,90) - ( X, Y), 13: AR ( J ) 

=AR(J) +1 : GOTO 1230 

1220 IFB=-1THENBEEP:G0T01300 

1228 GOTO1200 

1230 IFAR(J)>8THENAR(J)=1 

1240 F0RI=1T0AR(J):READX,Y,CAP (J) ,6(J): N 

EXTI 

1250 LINE(90,90)-(X,Y),7:BEEP:BEEP:60T01 
200 

1260 DATA110,90,0,19,104,68,45,20,90,58, 
90,21,72,70,135,18,70,90,180,19,74,113,2 
25,20,90,120,270,21,107,108,315,IB 
1300 PSET(160,100),OîPRINTIl,'SURFACE' 

1310 PSET(160,108),0:PRINTil,'VOILURE(X) 

■ 

1320 LINE(160,120)-(240,140),1,BF 

1330 PSET( 180, 130),0:PRINTil,SU(J):RESTO 

RE1410 

1340 A=STICK(0):B=STRIG(0) 

1350 IFA=5THENREADSU(J):G0T01380 
1360 IFB=-1THENIFSU(J)>VN(J)THENPSET(160 
, 150), 0: PRINTil,'IMPOSSIBLE':FORI=1TQ800 
:NEXTI:LINE(160, 149)-(242, 160),4,BF: GOTO 
1340ELSE:BEEP:BEEP:GOT01420 
1370 60T01340 

1380 IFSU(J)=100THENREST0RE1410 
1390 LINE(160,120)-(240,140),1,BF 
1400 PSET(180,130),0:PRINTi1,SU(J):BEEP: 
BEEP:G0T01340 

1410 DATAO,15,25,50,75,100 
1420 AN6=ABS(DV-CAP(J)) 

1430 IFANG=0THENR=0:AL«=*Baut au vent':6 
OT01480 

1440 IFAN6=450RDV=315ANDCAF'(J) =00RCAP(J) 
=315ANDDV=0THENR=.25:AL*='Au pres':60T01 
480 

1450 IFANG=900RCAP(J)=ÙANDDV=2700RDV=OAN 
DCAP(J)=2700RDV=45ANDCAP(J)=3150RCAP(J)= 
45ANDDV=315THENR=.5:AL*=*Vent de travers 
* :60T01480 

1460 IFANG=180THENR=1:AL$='Vent arriéré" 

:60T01480 

1470 R=.75:ALI='Largue" 

1480 PSET(20,170),0:PRINTil,"ALLURE:*;AL 

t 

1490 REST0RE1500:F0RI=1T0KH:READTK:NEXTI 
1500 DATA100,100,75,75,50,50,25,25,15,15 
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FICHE PROGRAMME 


1510 PR=SU(J)/TK:IFPR>=2THENVM(J)=VM<J)- 
20:PR=1ELSEIFPR>=1.5THENVM(J)=VM(J)-10:P 
R=l:IFPR>1THENPR=1 
1520 VN=VHN*R*PR 

1530 PSET(20,180): PRINTil,"VITESSE:";VN; 
"noeuds" 

1540 AA=STICK(0) : IFAAO5THEN1540 
1550 GOTO 1640 

1557 ’ 

1558 ’ carte *arine 

1559 ’ 

1560 PUTSPRITE1,(200, 140),0,1 :PUTSPRITE2 
,(200,156),0,2:PUTSPR1TE3,(216,1401,0,3: 
PUTSPRITE4,(216,1561,0,4 

1565 FOR 1=0T0250STEP10:LI NE(1,01 -(1,1911 
,5:NEXT1 

1570 F0RI=0T0250STEP1Û:LINE <0,11 -<255,11 
,5 :NEXTI 

1580 RESTORE 1610:FORI-1TOI 1 

1590 READE,X,Y,C,NS 

1600 PUTSPRITEE,(X,Y),C,NS:NEXTI 

1610 DATAI,30,150,12,9,2,50,50,12,9,3,11 

0,100,12,9,4,130,20,12,9,5,190,90,12,9,6 

,210,170,3,12,11,0,0,3,10 

1620 DATA7,210,10,7,5,8,210,26,7,6,9,226 

,10,7,7,10,226,26,7,8 

1630 LINEI251,01-1255,191),1,BF:RETURN 

1637 * 

1638 ’ deplaceaent navire 

1639 ’ 

1640 CLS:G0SUB1560:AC=0:IFJ=1THENNE=12EL 
SENE= 13 

1650 PUTSPRITE12,(X(1),Y(1)),15,6(1) : PUT 
SPR1TE13,(X(2),Y<2)),1,6(2) 

1654 X4=1NT(C0S(CAP(J)*3.1416/180)*<1852 
IVN/30)t.08)+X(J) 

1656 Y4=-(INT(SIN(CAP(J)*3.1416/180)1(18 
52tVN/30)l.08))+Y(J) 

1658 DS=(SQR((X(1)-X(2)) A 2+(Y(1)-Y(2)) A 2 
))/.08 

1660 FORV=OTOVN 

1670 X3=INT(CDS(CAP(J)*3.1416/180)*(1852 
»V/30)I.08)+X(J) 

1680 Y3=-(INT(BIN(CAP(J)*3.1416/180)*(18 
52*V/30)*.08))+Y(J) 

1690 IFX3>250THENX3=247:AC=1 

1700 IFX3<0THENX3=0:AC=1 

1710 1FY3<0THENY3=0:AC=1 

1720 IFY3>190THENY3=187:AC=1 

1730 IFX3>29ANDX3<47ANDY3>149ANDY3<167TH 

ENAC=2 

1740 IFX3>49ANDX3<67ANDY3>49ANDY3<67THEN 
AC=2 

1750 IFX3>109ANDX3<127ANDY3>99ANDY3<117T 
HENAC=2 

1755 IFX3>129ANDX3<147ANDY3>19ANDY3<37TH 
ENAC=2 

1760 IFX3>189ANDX3< 207ANDY3>B9ANDY3<107T 
HENAC=2 

1770 1FAC=1THENRC(J)=RC<J)-20:HE<J)=HE(J 
)-10:G0T01840 

1780 1FAC=2THENRC(J)=RC <J)-20:E(J)=E(J)- 


10:HE(J)=HE(J)-10:X3=X3-16:G0T01840 
1790 IFJ=1ANDX3>209ANDX3<227ANDY3>169AND 
Y3<187THENX3=X3+16:RC(J)=RC(J)-20:GOTOl8 

40 

1795 1FJ=1ANDLI(1)=1ANDX4>=0ANDX4<17ANDY 
4>=0ANDY4<17THENLI(1> =1 :X3=7:Y3=7:G0T018 

40 

1797 IFJ=2ANDLI(2)=1ANDX4>209ANDX4<227AN 
DY4>169ANDY4<187THENL1(2)=1:X3=216:Y3=17 
4:60TD1840 

1B00 IFJ=2ANDX3>=0ANDX3<17ANDY3>=0ANDY3< 
17THENX3=X3+16:RC(J)=RC(J)-20:GOTO 1840 
1810 IFL1<1)=0ANDJ=1ANDX3>=0ANDX3<17ANDY 
3 >=0ANDY3<17THENLI(1)=1 :X3=7:Y3=7: NE(J) = 
100:GDT01840 

1820 IFLI(2)=0ANDJ=2ANDX3>209ANDX3<227AN 
DY3>169ANDY3< 187THENX3=216:Y3=174: HE(J) = 
100:11(2)=1 :60T01840 

1825 IFJ=1ANDDS)125ANDX3>=X(2)ANDX3<=X(2 
)+3ANDY3>=Y(2)ANDY3<Y(2)+3THENRC(2)=RC <2 
)-30:RC(1)=RC(l)-10:E(2)=E(2)-10:X3=X3+5 
:GOTOl840 

1826 IFJ=2ANDDS>125ANDX3>=X(1)ANDX3<=X(1 
)+3ANDY3>=Y(1)ANDY3<Y(1)+3THENRC(1)=RC<1 
)-30:RC(2)=RC(2)-10:E(l)=E(l)-10:X3=X3+5 
:G0T01840 

1827 IFJ=1ANDX3>=X(2)ANDX3<=X(2)+3ANDY3) 
=Y(2)ANDY3<Y(2)+3THENX3=X3+5:RC(2)=RC(2) 
-10:G0T01840 

1828 1FJ=2ANDX3>=X(1)ANDX3<=X(1)+3ANDY3) 
*Y(1)ANDY3<Y(1)+3THENX3=X3+5:RC(1)=RC(1) 
-10:60TD1840 

1830 PUTSPRITENE,(X3,Y3),C(J),6<J):NEXTV 
: GOTO 1850 

1840 PUTSPRITENE.(X3,Y3),C(J),6(J) 

1850 BEEP:X(J)=X3:Y<J)=Y3 
1860 AA=STICK(0):IFAA< >5THEN1860 

1867 ' 

1868 ’ résultat de la lanoeuvre 

1869 ’ 

1870 60SUB3030: CLS 

1872 IFRC(J)<OTHENRC <J)=0 
1874 IFVHukOTHENVNIJXO 

1876 IFE(J)<OTHENE(J)=0 

1877 IFHE(J)<OTHENHE(J)=0 

1878 IFHl)(JXOTHENHU(J)=0 

1880 C0L0R3,4.1 :PSET(25,10),0:PRINTil,"R 
ESULTAT DE LA HANOEUVRE":GOSUB1885: GOTO 1 
950 

1885 LINE(15,25)-(220,105),12,B 

1890 C0L0R11,4,1:PSET(30,30),0:PRINTil, " 

Rsistance coque:*;RC(J):“X" 

1900 C0L0R7,4,1:PSET(30,45),0:PRINTil,“V 
oilureWIature.:*;VN(J);"X" 

1910 COLOR11,4,1:PSET(30,60),0:PRINTil," 

Equipage.: ‘ ; E ( J) ; "X" 

1920 C0L0R7,4.1:PSET(30.75),0:PRINTI1,"N 
oral équipage.,:*;NE(J);"X" 

1930 COLOR11,4,1 :PSET(30,90),0:PRINTil, " 

Munitions.: ";HU(J) ; *X" 

1940 RETURN 

1950 DS=(SQR((X(l)-X(2)) A 2+(Y(1)-Y(2)) A 2 


))/.08 

1960 C0L0R3,4,1 :PSET(40,120),4:PRINTil," 
Que voulez-vous faire?" 

1970 C0L0R7,4,1:PSET(90,140),4:PRINTil," 
1-Tirer" 

1990 PSET(90,160),4:PRINT*1,"2-RIEN" 

2000 F$=INKEY$:IFF$=""THEN2000 

2010 BEEP:CX=VAL(F$):IFCX<10RCX>2THEN200 

0 

2012 IFJ=1THENII=2ELSEI1=1 

2015 IFRC(J)=OORE(J)=OORHE(J)=00RVH(J)=0 

THENCOF=11:60T07000 

2020 IFCXMTHENGÛSUB6000 

2030 ’ changeaent de joueur 

2040 NEXTJ:G0T0250 

2497 ’ 

2498 ’ les aléas de la leteo 

2499 ’ 

2500 FORI=OTOLEN(NH*(1)):KH=INT(RND(1)* 1 
0):NEXTI :REST0RE2520 

2510 XXX=INT(RND(1)*8):FGRI=OTOXXX:READH 
ET*,DV:NEXTI 

2520 DATAE,0,NE,45,N,90,NO, 135,0,180,SO, 
225,S,270,SE,315 
2530 RETURN 

2997 ’ 

2998 'position navires sur la carte 

2999 ' 

3000 CLS:6DSUB1560 

3010 PUTSPRITE12,(X(1>,Y(1)),15, G( 1 ) : PUT 
SPRITE13,(X(2),Y(2)),1,6(2) 

3020 F$=INKEY*:IFF*=""THEN3020 

3030 REST0RE3060:F0RI=1T011 

3040 READE.X,Y,C.NS 

3050 PUTSPRITEE,(X,Y),C,NS:NEXTI 

3060 DATAI,30,150,0,9,2,50,50,0,9,3,110, 

100,0,9,4, 130,20,0,9,5, 190,90,0,9,6,210, 

170,3,0,11,0,0,0,10 

3070 DATA7,210, 10,0,5,8,210,26,0,6,9,226 
,10,0,7,10,226,26,0,8 
3080 PUTSPRITE12,lX(1),Y(1)),0,6(1):PUTS 
PRITE13,(X(2),Y(2)),0,6(2):RETURN 

3497 ’ 

3498 ’ état du navire 

3499 ’ 

3500 CLS:C0L0R3,4,1 

3510 PSET(70,10),0:PRINTil,"ETAT DU NAVI 
RE":GOSUB1885 

3520 AA=STICK(0):IFAA< >5THEN3520 
3530 RETURN 

3997 ’ 

3998 ’ la leteo 

3999 ’ 

4000 CLS:C0L0R3,4,1 

4010 PSET(90,10),0:PRINTil,"HETEO":RESTO 
RE4030 

4020 F0RI=0T0KH:READTS*,TH*,TV*:NEXTI 
4030 DATAcal«e,tres calse,«er d’huile,tr 
es legere brise,cal ne,"faibles,arrondies 
",legere brise,bonne,petite vagues,petit 
e brise,creuse,"vagues »oyennes,»outonne 
uses",jolie brise,houleuse,"hautes,longu 
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es',bonne brise,agitee,'longues,seches,e 
cretees" 

4040 DATAvent frais,très agitee,'fortes, 
ecuaantes',grand frais,grasse,très haute 
s,coup de vent,furieuse,‘iapressionantes 
,fuaantes“,fort coup de vent,dechainee,e 
xtreaeaent puissantes 
4050 C0L0R7,4,1 :PSET(10,50),0:PRINTil, "V 
ent de: * ; HET$; SPC (4) : TS$ 

4060 C0L0R11,4,1 :PSET(10,80),0:PRINTil,' 
Etat de la «er: * ;TM$ 

4070 C0L0R7,4,1 :PSET(10,110),0:PRINTil,' 
Type de vagues:' 

4080 PSET(10,120),0:PRINTil,TV$ 

4090 COLOR11,4,1 : PSET ( 10,150 ), 0 : PR INTI1, 
■Force:';KH 

4100 Kt-INKEYt: IFK$="THEN4100 
4110 RETURN 

4997 ’ 

4998 ’ reserves 

4999 ’ 

5000 CLS:COLOR3,4,1 

5010 PSETI50,10),4:PRINTI1,'Reserve b Re 
change' 

5020 LINE(20,25)-(235, 105), 1,B:LINE(190, 
2B)-(234,104),4,BF 

5030 C0L0R7,4,1 :PSET(30,30),4:PRINTil,*1 

-Coque.:';CR(J);T 

5040 PSET(30,45),4:PRINTil,'2-VoilurelMa 
ture.:';VR(J);"ï* 

5050 PSET(30,60),4:PRINTil,'3-Equipage.. 
.:';ER(J)i'r 

5060 PSET(30,75),4:PRINTil,'4-Nunitions. 
.:'îHR(J);"ï' 

5070 COLOR11,4,1:PSET(30,90),4:PRINTil,' 
5-RIEN' 

5080 C0L0R3,4,1 :PSET(50, 120),4:PRINTil,' 
Votre choix?' 

5090 K$=1NKEY$: IFK4="THEN5090 

5100 BËEP:CX=VflL(K*):IFCX<10RCX>5THEN509 

0 

5110 0NCX60T05120,5140,5160,5180,5200 
5120 RC(J)=RCtJ)+CR<J):IFRC(J)>1OOTHENCR 
(J ) =RC(J)-100:RC(J)=100ELSECR(J)=0 
5130 60T05020 

5140 VH(J)=VH(J)+VR(J):1FVH(J)>1OOTHENVR 
(J)=VM(J)-100 :VM(J)=1OOELSEVR(J)=0 
5150 60T05020 

5160 E(J)=E(J)+ER(J):IFE(J)>100THENER(J) 
=E ( J )-100 : E ( J )=100ELSEER < J ) =0 
5170 60T05020 

5180 NU(J)=HU(J)+MR(J): IFHU(J)>1OOTHENhR 
( J)=MU(J)-100:HU(J)=100ELSEHR(J)=0 
5190 60T05020 
5200 RETURN 

5997 ’ 

5998 ’ balistique 

5999 ’ 

6000 IFDS>5000RNU(J)=0THENME(J)=ME(J)-5: 
PSET(70,180),4:PRINT#1,'PAS POSSIBLE*:F0 
RI=1T0900:HEXTI:RETURN 

6010 IFJ=1THENII=2ELSEI1=1 


6020 IF6(J)-19THEN6070 

6030 IF6(J)=20THEN6060 

6040 IF8(J)=21THEN6140 

6050 IFX(II)>X(J)ANDX(IIKX(J)+40ANDY(II 

)< Y(J)ANDY(11)>Y(J)-400RX <11)<X 4J)ANDX <1 

I)>X(J)-40ANDY(II)>Y(J)ANDY(11)< Y(J)+40T 

HEN6230ELSE6210 

6060 IFXdIXX (J)ANDX (11) >X (J)-40ANDY(11 
)<Y(J)ANDY(II)>Y(J)-400RX(II)>X(J)ANDX(I 
I)<X(J)+40ANDY(II)>Y(J)ANDY(II)<Y(J)+40T 
HEN6230ELSE6210 
6070 X1=X(J):X2 Z X(J) 

6080 F0RI=Y(J)T0Y(J)+40:X1=X1-1:X2=X2+1 
6090 IFX(II)>X1ANDX(II)<X2ANDY(II)=ITHEN 
6230 

6100 NEXTI:X1=X(J):X2=X(J) 

6110 F0RI=Y(J)T0Y(J)-40STEP-1:X1=X1-1:X2 
=X2+1 

6120 IFX(11)>X1ANDX(II)< X2ANDY(11)=ITHEN 
6230 

6130 NEXTI:G0T06210 
6140 Y1=Y(J):Y2=Y(J) 

6150 FORI=X(J)TOX(J)+40:Y1=Y1-1:Y2=Y2+1 
6160 IFY(II)>Y1ANDY(II)<Y2ANDX(II)=ITHEN 
6230 

6170 NEXTI:Y1=Y(J):Y2=Y(J) 

6180 FORI=X(J)TOX(J)-40STEP-1 : Y1=Y1-1 :Y2 
=Y2+1 

6190 IFY(11)>Y 1 ANDY( 11XY2ANDX(11)=ITHEN 
6230 

6200 NEXTI 

6210 PSET(10,180),4:PRINTil,'Mauvaise po 
sition pour tirer": FOR 1=1T0900:NEXTI :RET 
URN 

6230 60SUB3030:CLS 

6240 LINE(0,0)-(255,117),5,BF:CIRCLE(50, 
33), 11,11,0,6.28, 1.4:PAINT(50,28),11 : RES 
T0RE6270 

6250 F0RI=1T04:READE,X,Y,NS 
6260 PUTSPRITEE,(X,Y),C(J),NS : NE XTI 
6270 DATA5,0,85,1,6,0,101,2,7,16,85,3,8, 
16,101,4 

6275 N=10:BN=22:F0RI=120T0128STEP3 

6276 wINt(N,l)-(BN,I),C(J):N=N+2:8N=BN-2 
:NEXTI 

6280 X5=24+.4IDS 

6285 PUTSPRITE1'X5,101),C(II),17 
6290 LINE(0,180)-(255,191),1,BF 
6300 PSETI20,182),liPRINTIl,'Angle de ti 
r: * :AN=0 

6310 AA=STICK(0):BB=STRI6(0) 

6320 IFAA=5 THENLI NE(129,1801-1200, 1911,1 

,BF:AN=AN+1:60T06350 

6330 IFBB=-1THEN 6370 

6340 60T06310 

6350 IFAN>34THENAN=0 

6360 PSET(130,182),1:PRINTil,AN;’o'îBEEP 
:60TQ6310 

6370 HZ=30:B0SUB8500:NA=ANt <3.1416/180) 

6380 F0RXX=1T0600STEP8 

6390 Y=INT(-4.9051<XX A 2>/2500I(COS(NA) A 2 

)+TAN(NA)»XÏ)+l:Yl=INT((YI.4)-l):Xl=INT( 


XXI.4) 

6400 PSETI24+X1,109-Y1),15:X6=Xl+24:Y6=l 
09-Y1 

6402 IFX6>X5+3ANDX6<X5+11ANDY6>100ANDY6< 
109THENVN(II)=VN(II)-20:60T06440 
6404 IFX6>X5+7ANDX6<X5+12AN0Y6>108ANDY6< 
118THENVH ( 11 ) =VH ( 11 ) -15: E ( 11 ) =E ( 11 ) -20:6 
0T06440 

6406 IFX6>X5+1ANDX6<X5+8ANDY6>113ANDY6<1 
18THENRC(II)=RC(II)-20:60T06440 
6410 IFY<=-12THEN6430 
6420 NEXTXX 

6430 HZ=2:B0SUB8500:F0RI=1TD1000:NEXT1:6 
QTQ6460 

6440 PUTSPRITE10,(X5,101),6,17:HZ=21:60S 

UB8500:FQRI=1TQ1000:NEXTI 

6450 IFVN (IIX =00RRC ( 11)< =OORE(II)<=OTHE 

N6470 

6460 CLS:60SUB3030:HU(J)=HU(J)-10:RETURN 
6470 PUTSPRITE1,1X5,1171,4,11 
6480 FORI=101T0117STEP.05 
6490 PUTSPRITE10,(X5,I),6,17:NEXTI 
6500 F0RI=1T01000:NEXTI:COF=J:60TD7000 

6997 ’ 

6998 ’ FIN 

6999 s 

7000 CLS:60SUB3030:SCREENO:C0LDR7,13:60S 
UB20 

7010 L0CATE4,7:PRINT'La victoire apparti 
ent':L0CATE4,9:PRINT'au capitaine ';NN$( 
COF):L0CATE4,lhPRINT'sur son navire:*;N 
N4IC0F) 

7020 AA=STICK(0):IFAA<>5THEN7020 
7030 CLS:END 

8497 ’ 

8498 ’ bruit explosion 

8499 ’ 

8500 S0UND6,HZ :REST0RE8510:F0RI=7T010:RE 
ADSN: SOUND I,SN:NEXT I 

8510 DATA7.16,16,16 

8520 S0UND12,16:S0UND13,0:F0RI=1T0500: NE 
XT1:RETURN 
8697' ’ 

B69B ’ en tete 

8699 ' 

8700 C0L0R3,4:CLS 

8710 F0RI=8T012STEP4:LQCATE10,1 :PRINTSTR 

IN6*(15,"t'):NEXTI 

8720 F0RX=10T024STEP14 

8730 FORY=9T011 :LOCATEX,Y:PRINT**':NEXTY 

8740 NEXTX 

8750 1=1 :A*=' Les productions JPX v 
ous présentent t ECUNEURS DES MERS t Tap 

ez sur une touche pour coaaencer 
■ 

8760 L0CATE12,10:PRINTHID*(A$, 1,11) 

8770 1=1+1:IFI>91THENI=1 
8780 BEEP:F0RU=1T070:NEXTU 
8790 K4=INKEY$:IFK*="*THENELSERETURN 
8800 60T08760 

8997 ’ 

8998 ’ initia.Variables et lutins 
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899? ’ 

9000 X(1)=7:Y(1)=7:X(2)=216:Y(2)=174:VMN 
=15:C(1)=15:C(2)=1:RC(1)=100:RC(2)=100:V 
H(1)=100:VM(2)=100:E(1)=100:E(2)=100:ME( 
1)=100:ME(2)=100:I1U(1 ) ï 100:NU(2)=100: ILE 
$(1)=•de la TORTUE*:ILE*(2)=*du CRABE":R 
EST0RE9090 

9005 6(1)=18:B(2)=18:LI(1)=1:LI(2)=1:CR( 
1)=100:CR(2)=100:VR(1)=100:VR <2)=100:ER( 
1)-100:ER(2)=100:MR(1)=100:MR(2)=100 
9008 PSET(75,85),0:PRINTI1,"INITIALISAT1 
ON" 

9010 F0RLQ=1T017 
9020 FORMQ=1T04:A*=“" 

9030 F0RNQ=1T08 
9040 READP4 

9050 A$=A$+CHR$(VAL("&H"+Pt) ) 

9060 NEXTNQ: ( MQ ) =A$ : NEXTHO 

9070 SPR1TE$(L8)=A$(1)+A$(2)+At(3)+A$(4) 

9080 NEXTLQ 

9090 DATAOO,00,00,00,00,00,00,00,00,00,0 
0,00,00,00,03,01,01,01,07,03,03,07,01,3F 
,1F,IF,1F,1F,3F,01,FF,FF 
9100 DATAOO,00,00,00,00,00,00,01,00,00,0 
0,00,00,00,00,00,FF,FF,7F,7F,7F,79,E3,CF 
,1F,1F,7F,1F,3F,3F,1F.0F 
9110 DATAFO,08,EO,CO,CO,EO,80,FC,F8,F8,F 
8,F8,FC,80,FF,FF,00,00,00.00,00,00,00.00 
,00,00,00,00,00,00,80,00 
9120 DATAFF, FE,FE,FE,FE,9E,C7,F3,F8,F8,F 

E, FB,FC,FC,F8,FO,00,00,00,00,00,00,00,80 

, 00 , 00 , 00 , 00 , 00 , 00 , 00,00 

9130 DATAOO,00,00,00,08,OC,07,03,01,71,5 

0,50,50,70,07,3F,01.01,01.01.01,03,03.C3 

,E3,FB,FF,7F,3F,3F,FF,FE 

9140 DATAFF,07,00,00,00,00,01,01,03,07,0 

C,00,00,00,00,00,FE,FF.3F,7F,7F,FF,F3,F3 

,C3,03,03,39,21,39.08,38 

9150 DATAI 1,19,95,93,91,CO,CO,C3,C7,CF,F 

F, FE,FE,FC,FF,7F,00,00,00,00,00,30,EO,CO 
,CO,80,00,00,00,00,EO,FF 

9160 DATA7F,FF,FC,FC,FE,FF,DF,C7,C1,C0,C 

0,80,80,80,80,80,FC,EO,07,04,06,04,87,CO 

,EO,EO,30,10,00,00,00,00 

9170 DATA06,OF,OF,47,EF,FF,FF,7F,3F,3F,7 

F,7F,3F,72,FO,40,60,7F,FF,FE,FE,FC,FC,F8 

,FC,FE,FE,FC,FF,FE,7C, 18 

9180 DATAFF,FF,FF,FE,FC,F8,FO,FO,F8,FO,F 

8, FC,FE, 7F, 3F, 07, FO,F8,7E,3C,1C,0E,0E,07 

,07,02,00,00,00,06,FF,71 

9190 DATAFF,FF,FF,FF,FF,FF,FF,FF,FF,FF,F 

F,FF,FF,FF,FF,FF,FF,FF,FF,FF, FF,FF,FF,FF 

,FF,FF,FF,FF,FF,FF,FF,FF 

9200 DATA09,18,38,30,20,EO,60,70,78,3E,3 

F,1F,OF, 1F,03,01,00,C8,7C,OC,OE,OF,OE,OE 

,3E,7C,FE,F8,F0,FC,A8,80 

9210 DATAIE,OC,OC,08,1F,2C,4C,2C,1C, IC,2 

A,49,88,08,08,OC,00,00,00,38,EO,20,00,00 

,00,00,00,00,80,80,80,CO 

9220 DATA08,10,20,20,20,11, 1E, 10,00,00,0 

1,02,02,04,04, OC,00,E2,C2,44,F8,EO,EO,EO 

,EO,CO,40,20,1E,02,00,00 



9230 DATAOO,00,00,00,00,00,00,00,00,00,0 

O.OE,11,9F,FF,DF,00,00,00,00.00,00,00,00 

,00,00,00,00,00,FE,82,FC 

9240 DATAOO,08,04,02,91,40,25,12,09,4A,2 

5,IB,08,04,09,02,00,01,24,08,12,A4,40,24 

,48,90,26,C8,90,A8,10,00 

9245 DATA01,03,01,07,03,07,01,1F,OF,OF,0 

F,19,03,07,0F,07,00,80,00,CO,80,CO,00,FO 

,EO,EO,EO,30,80,CO,EO,CO 

9250 F0RLX=18T021:I*="* 

9260 F0RN2=1T08:READSP4 
9270 I$=It+CHR$(VAL("fcH"+SP$)) 

9280 NEXTNZ:SPRITES(LX)=I$:NEXTLZ 
9290 RETURN 

9300 DATA80.40,20,00,00,00,00,00, FO, 00,0 
0,00,00,00,00,00,20,40,80,00,00,00,00,00 
,80,BO,80,80,00,00,00,00 
9500 C0L0R3,1,4:CLS 

9510 L0CATE5,10:PRINT"Voulez-vous la reg 
1e?(0 ou N)" 

9520 Ri=INKEYi:IFR$=*'THEN9520 
9530 IFR*="0*THENELSERETURN 
9540 CLS 

9550 PRINT"INTRODUCTION":PR1NT 
9560 PRINT'Ce jeu est une simulation d’u 
n combat tactique entre 2 navires de l’e 
poque du 17eme siede dans les mers des 
Antilles.(on joue 2 joueurs)" 

9570 PRINT:PRINT"PRESENTATION DU JEU’iPR 
INT 

9580 PRINT'Le champ de manoeuvre est del 
imite par le perimetre de 1'écran,repr 
esen-tant une surFace de mer de 3120m su 
r 2300m parsemee de recifs;2 iles sont d 
isposees sur la carte,servant de port 
d’attache au* navires:" 

9590 PRINT'Une au NO l’ile de la tortue 
l’autre au SE l’ile du crabe,elles perme 
t- tront de reparer les avaries du 
navire et de Faire le plein d’hommes e 
t de munitions." 

9600 L0CATE8,21 :PRINT'TAPEZ UNE TOUCHE" 
9610 R$=INKEY$:IFR*=*"THEN9610 
9620 CLS:PRINT'COHHENT JOUER:" 

9630 PRINT"6race a des menus vous pourre 
z avoir accès a diFFerentes inFormations 
et commandessHanoeuvrer.etat du navire 
, meteo.etc..." 

9640 PRINTTABF9);"DETAIL DES MENUS:":FRI 
NT 

9650 PRINT"CHOIX 1-HANOEUVRES DU NAVIRE" 
: PR INT 

9660 PRINT'Vous choisirez votre cap a 1’ 
aide de la touche Flechee du bas,et vali 
derez avec la barre d’espacement,vous Fe 
rez de me ensuite pour la surFace voi¬ 
lure droite de l’écran,la Force du ve 
nt variant de 09;i1 est important" 

9670 PRINT’de réduire cette surFace quan 
d le vent Forcit aFin d’eviter des de 
chi- rures de la voilure.La surFace est 
a peu près inversement proportionnelle 


a la Force du vent exemples:* 

9680 PRINT*FORCElet2)100Z F0RCE5et 
6>50Z" 

9690 LQCATE8,22:PRINT"TAPEZ UNE TOUCHE" 
9700 R$=INKEY$:IFR*=*"THEN9700 
9710 CLS:PRINT"CHOIX 2-L’ETAT DU NAVIRE" 
:PRINT 

9720 PRINT'Pour voir les dommages occasi 
onnes par l’ennemi ou par une mauvaise 
na- vigation.":PR!NT 
9730 PRINT’CHOIX 3-LA METEO":PRINT 
9740 PRINT"Indique le sens du vent et sa 
Force.":PRINT 

9750 PRINT’CHOIX 4-LA CARTE MARINE":PRIN 
T 

9760 PRINT'Elle permet de bien situer la 
posi- tion des navires avant la manoeu 
vre. Elle est quadrillée de carre repré¬ 
sentant 125m de cote.".-PRINT 
9770 PRINT’CHOIX 5-LES RESERVES":PRINT 
9780 PRINT’Elles sont accessibles seulem 
ent dansvotre port,pour reparer,complété 
r les avaries." 

9790 L0CATE8,22:PRINT"TAPEZ UNE TOUCHE* 
9800 R*=INKEY$:IFR$=""THEN9800 
9810 CLS:PRINT’LE COMBAT":PRINT 
9820 PRINT'Apres la manoeuvre on vous pr 
oposera de tirer,a vous d’apprecier la d 
is- tance entre les 2 navires pour savo 
irsi vous etes a portée(500m) et bien p 
ositionne." 

9830 PRINT'Si les conditions sont requis 
es vous passerez a un nouvel écran,ou a 
1’ aide de la touche Flechee du bas vo 
uschoisirez l’angle de tir de vos ca- n 
ons et Ferez Feu avec la barre d’ espa 
cernent." 

9840 L0CATE8,20:PRINT’TAPEZ UNE TOUCHE" 
9850 L0CATE8,22:PRINT’ET BONNE PARTIE!" 
9860 R$=INKEYt:IFR$=""THEN9850 
9870 RETURN 


















75 DRAH20,-30,1 : DRAM-12,-14,1:F0RT=1T06 


Lucien Delforge 

À seize ans, Lucien programme de¬ 
puis environ trois ans. A commencé 
sur ZX 81 puis Atmos. Actuellement 
en 1ère S, compte passer un bac C 
ou D. Programme surtout des jeux, 
des fichiers en Basic ou des simula¬ 
tions économiques. Passe-temps fa¬ 
voris : numismatique et micro-infor¬ 
matique. Compte faire une carrière 
dans l'informatique. 

L e titre devrait être « Qui a tué 
tante Agatha ? », puisque le but 
du jeu est de trouver l’assassin 
de l'infortunée tata. Jouant les Hercule 
Poirot, vous allez parcourir les lieux du 
crime à la recherche d'indices sur le 
crime et les suspects. Mais attention, 
l'assassin rôde encore sur les lieux et, 
inquiet de la progression de votre en¬ 
quête, il vous poursuit et cherche à 
vous faire subir un mauvais sort. Il est 
indispensable de se munir d’un crayon 
et de papier avant de partir en chasse. 
Attention : certaines lignes du listing 
font plus de 80 caractères alors qup 
l’Atmos ne vous permet pas d’en en¬ 
trer autant. Il suffit de taper un « ?» à 
la place de chaque PRINT pour régler 
ce problème. ■ 


Lucien DELFORGE 


10 TEXT:CLS:PAPER7:INK1:HIRES:INK3:PLAY 
7,0,0,0:P0KE618,10 

20 F0RT=50T057:CURSETT. 50,3: CIRCLE30,1: 
NEXT:CURSET 48,80,1 :DRAM8,0,1 
30 DRAW0,8,1 :DRAW-8,0,1 :DRAN0,-8,1: DRAW 
0,20,l:DRAW8,O,l:DRAW0,-20,1 
40 DRAW0,70,1:DRAW-B,0,1:DRAW0,-70,1 :CU 
RSET38,35,1 :DRAW-3,8,1 :DRAW8,0,1 
50 DRAW3,-8,t:DRAW-8,0,1:DRAW4,0,1: DRAW 
-3,8,1 :CURM0V-2,-4,1:DRAH8,0,1 

55 A*=CHR*(96)+“ par DELF0RBE Lucien.': 
F0RT=1 T0LEN ( A$ ) : CLIRSET30+ (8*T ) ,180,3 

56 CHARASC(MID*(A*,T,1)),0,1 :NEXT:CURSE 
T6,175,3:FILL20,1,3 

60 CURSET200,20, 1 :DRAW-20,30,1:DRAW-3,- 
3,1:DRAW-5,10,1 :DRAW3,3,1 :DRAW-40,70,1 
65 DRAW1,30,1 :DRAW50,-88,1 : DRAW-10,-12, 
1 :DRAHS,6,1:PATTERN170: DRAW-45,80,1 
70 PATTERN255:CURSET187,73, 1 :DRAW4,3,1: 
DRAW5,-10,1 :DRAW-3, -3,1 


:CURSET136,160, 1 :DRAHT,-12,1 :NEXT 
80 CURSET136,170,1 :F0RT=1T05:CIRCLET,1 : 
NEXT:F0RT=-3T03:CURSET136,160,1 
85 DRAWT,6,1:NEXT:CURSET6,0,1:FILL18,1, 
5:FILL62,1,4:F!LL80,1,2 
90 CURSET110,20,3:FILL12B,1,6:FILL30,1, 
1 :A$='8UI A TUE TANTE A6ATHA ?■ 

95 F0RMT0LEN (A$> : CURSET (T*8) +30,5.3: C 
HARASC(NID»(A$,T,1)),0,1:NEXT 

96 NA1T100:PRINT:PRINT" B E N E 

R I B U E":60SUB25000 

99 CLS: PAPER0:INK6:P0KE618,10:POKE48035 
,0:PLOT 12,12,CHR»(12)+'PATIENTEZ S.V.P" 

100 E=INT(RND(1)»7)+1 

110 F0RT=1T0E:F0RR=1T08:READA$(R):NEXT: 
NEXT:IFE=7THEN130 

120 F0RT=1T07-E:F0RR=1T08:READAA«:NEXT: 
NEXT 

130 E=INT(RND(1)»7)+1 
140 F0RT=1TQE:F0RR=1T08:READBf(R) : NEXT: 
NEXT:IFE=7THEN160 

150 F0RT=1T07-E:F0RR=1T08:READAA$: NEXT: 
NEXT 

160 E=INT(RND(1)I7)+1 
170 F0RT=1T0E:F0RR=1T08:READC*(R):NEXT: 
NEXT:IFE=7THEN200 

180 F0RT=1T07-E:F0RR=1T08:READAA$:NEXT: 
NEXT 

200 Al=INT(RND(l)t6)+2 

205 A2=INT(RND(l)t6)+2:IFA2=A1THEN205 

210 NP»=A»( 1 ):P1»=A»(Al) : P2$=A*(A2) 

220 A1=INT(RND(1)16)+2 

225 A2MNT(RND(l) 16) +2:IFA2=A1THEN225 

230 NA$=B$(1): A1f=B$(Al):A2<=B$ <A2) 

240 A1=INT(RND(1)*6)♦2 

245 A2=INT(RND(1)161+2:IFA2=A1THEN245 

250 NS»=C»(1):S1$=C*(Al):S2»=C»(A2) 

300 F0RR=1T013:READA$ 

310 F0RTMB400+8IASC<A») T0IB400+84ASC (A 
$)+7:READD:P0KET,D:NEXT:NEXT 
400 F0RT-1T06 

410 A=INT(RND(1)I44)+1:I(T)=A 
420 IFT=1THENNEXT 
430 F0RY=1T0T-1:IFI(Y)=ATHEN410 
440 NEXT:NEXT 

450 ER*(l)='p'+Pl»:ER»(2):'p'+P2» 

452 ER»(3)-"a“+Al»:ER»(4)='a“+A2» 

454 ER* <5)='s"+Sl$:ER$(6)="s"+S2* 


460 F0RT=1T06 

470 J=INT(RND(1)*6)+1 :CX(T)=J:IFT=1THEN 
NEXT 

480 F0RY=1T0T-1:IFCX(Y)=JTHEN470 
485 NEXT:NEXT 

490 F0RT=1T06:PX*(T)=ER*(CX(T)):NEXT 
500 CLS:PAPER4:INK6:F0RT=18T026:PL0T0,T 
,CHR*(22)+CHR*(4):NEXT 
510 B*=CHR*(255)+CHR*(255)+CHR*(6) 

520 PL0T0,1,CHR»(22)+CHR»(5)+" Score: 

No«bre cps:' 

525 PLOTO,0,CHR*(21)+CHR*(6)+“ QUI 
A TUE TANTE A6ATHA ?' 

530 F0RT-5T014STEP3:F0RR=4T036STEP3:PL0 
TR,T,G*:PL0TR,T+1,G*:NEXT:NEXT 
540 PL0T4,3,"Votre parcours:":PL0T4,19, 
"Vos instructions:’ 

550 PLOT 1,22,CHR*(1)+CHR*(12)+"Appuyer 
sur une touche pour co«»encer‘ 

560 6ETH*:L*=" 

" : PLOT 1,22, CHR* (4) +-L* 

600 NUSIC1,1,l,0:f1USIC2,1,5,0:NUSIC3,1, 
B,0:PLAY7,0,1,10000:6*=" *+G»+' ' 

610 TPS=50:X=3:Y=5:L1*=CHR*(2)+CHR*(251 
)+CHR*<253)+CHR*(6):PS=1:XM=X:YN=Y 
615 L2*=CHR*(2)+CHR*(219)+CHR*(221)+CHR 
4(6) 

620 PL0T9,1,STR*(SC):PL0T32,1,STR»(TPS) 

630 PL0TX,Y,L1*:PL0TX,Y+l,L2* 

650 PRINTB2,21j"Pour avancer,appuyer su 
r une touche et lancer ainsi le de.' 
660 6ETH*:60SUB5000 
670 PS=PS+S:BOSUB1BOOO 
700 1FXH=XANDYN=YTHEN15000 
703 60SUB6000 
705 60SUB8000 

710 PL0T2,22,'Avez-vous résolu cette en 
igae (o/n)?" :GETH* 

720 IFH*='0*THENB0SUB7000 
730 IFH*='N'THEN740ELSE710 
740 60SUB10000 

750 PRINT82,22:"Voulez-vous les renseig 
ne*ents sur un des suspects (o/n)?" 

760 GETH*:IFH*='0'THEN60SUB9000:60T0780 
770 IFH*="N"THEN780ELSE760 
780 BDSUB10000 

790 TPS=TPS-1:PL0T32,1, " ':PL0T32,1, 

STR»(TPS) 
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795 IFTPS=OTHENZAP:WAIT150:60T015000 
800 60T0650 

900 DATA5,1,3,10,0,4,5,3,10,1,4,5,3,10, 
0,5,1,3,10,1,5,1.3,10,0,5,1,3,10,0 
910 DATAS, 1,3,10,0,5,1,3,10,0,5,1,3,10, 
0,4,5,3,10,1,4,5,3,10,0,5,1,3,10,1 
920 DATAS, 1,3,10,0,4,5,3,10,0,4,6,3,10, 
0,4,5,3,10,0,4,3,3,3,1,4,3,3,3,1 
930 DATA4,3,3,3,1,4,12,3,3,1,4,12,3,3,0 
,4,12,3,3,0,4,12,3,3,0,4,12,3,3,0 
940 DATA4,12,3,5,0,4,3,3,5,1,4,3,3,5,0, 
4,12,3,5,1,4,12,3,7,0,4,3,3,7,0 
950 DATA*, 5,3,7,0,4,3,3,7,0,4,1,3,10,1, 
4,1,3,10,1,4,1,3,10,1,4,10,3,10,1 
960 DATA4,10,3,8,0,4,10,3,8,0,4,10,3,8, 
0,4,10,3,8,0,4,10,3,6,0,4,1,3,6,1 
970 DATA4,1,3,6,0,4,10,3,6,1,4,10.3,5.0 
,4,1,3,5,0,4,3,3,5,0,4,1,3,5,0 
980 DATA3,12,3,3,1,3,12,3,3,1,3,12,3,3, 
0.4.9.3,3,0.4,9,3,6,0,4,9.3,6,0 
990 DATA4,9,3,6,0,4,9,3,6,0,4,10,3,1,0 
1000 DATALIEUTENANT DOUILLE,UN GALLON 11 
ILITAIRE,UNE MEDAILLE MILITAIRE 
1010 DATAUN PORTEFEUILLE VIDE,UN MORCEA 
U DE TISSUS KAKI,UN BOUTON DORE 
1020 DAT AUNE TOUFFE DE CHEVEUX. UNE PHOT 
0 D’UN CHAR A.M.X 

1030 DATAMADAME AUNIAC.UNE PERRUQUE DE 
CHEVEUX FRISES.UN SAC VIDE 
1040 DATAUN MOUCHOIR DE LOURDES,UN CHIF 
FON.UNE GOUTTE DE DETARTRANT A N.C 
1045 DATAUNE IMITATION DE BROCHE.UNE CL 
E DE PLACARD DE RANGEMENT 
1050 DATASIR PIERRE.UN MONOCLE.UNE PIPE 
EN BOIS.DES CLES DE VOITURE 
1060 DATAUN PORTEFEUILLE VIDE.DU TABAC 
DE GRANDE QUALITE.UN JOURNAL DE 1897 
1070 DATAUNE PIECE DE MONNAIE REPRESENT 
ANT LA REINE ELISABETH 1 ERE 
1080 DATADOCTEUR HOPE.UNE PERRUQUE DE C 
HEVEUX FRISES.UNE PIPE EN BOIS 
1090 DATAUN FLACON D’ASPIRINES VIDE.UN 
ETUI A CIGARETTES VIDE 

1100 DATAUN BILLET D’UNE LIVRE STERLING 
.UN LIVRET SUR LE CANCER 
1110 DATAUNE LOUPE A FORT GROSSISSEMENT 
.L’ABBE TISE.UN MISSEL,UN BOUTON DORE 
1120 DATAUNE CHAINE AVEC UNE CROIX EN 0 
R,UN MORCEAU DE SOUTANE NOIRE 
1130 DATAUN MOUCHOIR DE LOURDES.UNE CAR 
TE POSTALE DU VATICAN.UNE OSTIE 
1140 DATAALAIN TERIEUR,DE L’HUILE DE VI 
DANGE.'.’N 6AND DE CUIR 
1150 DATAUN PORTEFEUILLE VIDE,UN BOUTON 
DORE,DES CLES DE VOITURE 
1160 DATAUN CHIFFON PLEIN DE GRAISSE,UN 
E REVUE SUR L mjiOMOBILE DE COURSE 
1170 DATAHELENA GEOIRE,UN MOUCHOIR DE D 
ENTELLE GRIFFE DE 3 LETTRES "LNA" 

1180 DATADATAUN SAC VIDE.UN TUBE DE ROU 
GE A LEVRES.UN ETUI A CIGARETTES VIDE 
1190 DATAUNE CHAINE AVEC UNE CROIX EN 0 


R.UN FLACON DE PARFUM.UNE BAGUE EN OR 
1200 DATAREVOLVER,@UNE TRACE D’UNE BALL 
E DANS LE COEUR,tUNE FORTE DETONATION 
1210 DATAMU’IL EST MORT INSTANTANEMENT 
,#UN CRI BREF,SLA BLESSURE EST AU COU 
1220 DATA8DES TRACES DE POUDRE SUR LES 
VETEMENTS 

1230 DATA'UNE DOUILLE D’UNE BALLE SUR L 
A TABLE,COUTEAU.SUNE PLAIE BEANTE 
1240 DATAI PETITS DEBRIS DE METAUX PAR T 
ERRE.IUN CRI BREF 

1250 DATA8L’ARME TRANCHANTE ETAIT COURT 
E.(IL MANQUE UN COUTEAU DANS LA CUISINE 
1260 DATA'UN DIAMANT APPARTENANT A UNE 
ARME TRAN-CHANTE 

1270 DATASLES COUPS DE L’ARME SONT NOMB 
REUX ET BREFS 

1280 DATAEPEE.8UNE PLAIE BEANTE.HUN CRI 
BREF.(L’EPEE DE SIR PIERRE A DISPARUE 
1290 DATA'MORCEAU DE CORDE OU DE CORDEL 
ETTE, ILE FOURREAU D’UNE EPEE DEHORS 
1300 DATASLA LAME DE L’ARME ETAIT LONGU 
E.SL’ARME ETAIT TRES ANCIENNE 
1310 DATASERIN6UE EMPOISONNEE,SUN PETIT 
TROU SUR LE BRAS DROIT 
1320 DATASQU’IL EST MORT PAR ASPHYXIE,t 
UN CRI BREF 

1330 DATASQU’IL EST MORT INSTANTANEMENT 
.(LA TROUSSE DU DOCTEUR A DISPARUE 
1340 DATASLE BOUT D’UNE AIGUILLE RESTEE 
PLANTEE DANS LE BRAS DROIT 
1350 DATA'UNE FIOLE DE POISON PRES DE L 
A VICTIME.CORDE.SLA BLESSURE EST AU COU 
1360 DATASQU’IL EST MORT PAR STRANGULAT 
ION,SOU’IL EST MORT PAR ASPHYXIE 
1370 DATA'MORCEAU DE CORDE OU DE CORDEL 
ETTE.SL’ARME ETAIT LONGUE ET SOUPLE 
1380 DATASQU’IL A ETE LIGOTE ET TUE,(IL 
MANQUE UNE CORDELETTE A UN RIDEAU 
1390 DATACLEF ANGLAISE.SUNE FRACTURE DU 
CRANE,«UN BRUIT DE COUP 
1400 DATA'DES PETITS DEBRIS DE METAUX P 
AR TERRE.(IL MANQUE DE OUTILS AU GARAGE 
1410 DATASL’ARME EST D’ORIGINE BRITANNI 
QUE,SL’ARME EST UN OUTIL DE TRAVAIL 
1420 DATASL’ASSASSIN PEUT ETRE UN GARAG 
ISTE,BUCHE.SUNE FRACTURE DU CRANE 
1430 DATAfUN BRUIT DE COUR,(MORCEAU DE 
BOIS PRES DE LA VICTIME 
1440 DATAIUN CRI BREF, ILE BOIS DE LA CH 
EMINEE A ETE DERANGE 
1450 DATAS1L Y A DES TRACES DE CENDRES 
SUR LES VETEMENTS 

1460 DATASSI CE N’ETAIT PAS L’HIVER LA 
VICTIME SERAIT ENCORE PARMI NOUS 
1500 DATACUISINE.X.'SUR LE MORT UNE SER 
VIETTE DE TABLE 

1510 DATA'PRES DU MORT UNE FOURCHETTE E 
CRASEE.(UNE TABLE EST FORTEMENT GRIFFEE 
1520 DATA4DE L’EAU SAVONNEUSE PAS TERRE 
.SDE LA VAISSELLE BRISEE 
1530 DATASDES TACHES DE BEURRE,SALLE A 


MANGER.X,'DE L’ARGENTERIE PAR TERRE 
1540 DATAI SUR LE MORT UNE SERVIETTE DE 
TABLE.'UN CENDRIER BRISE 
1550 DATAtUNE TABLE EST FORTEMENT GRIFF 
EE,'UNE COUPE DE CHAMPAGNE RENVERSEE 
1560 DATA'UN LUSTRE DECROCHE,SALON.X,'U 
N CENDRIER BRISE 

1570 DATA4UNE TABLE EST FORTEMENT GRIFF 
EE.(LA LAMPE DU LUSTRE EST CASSEE 
1580 DATA'DU SANG SUR LA TABLE DE SALON 
,(L’ECRAN DU TELEVISEUR EST CREVE 
1590 DATAIDU SANG PRES DE LA CHEMINEE.C 
HAHBRE DE F ILLE,X 

1600 DATA'UNE LAMPE DE CHEVET CASSEE,'P 
ENOIR FEMININ DECHIRE 
1610 DATAtLA LAMPE DU LUSTRE EST CASSEE 
,IDES ROBES ARRACHEES 
1620 DATA'DES POUPEES DESARTICULEES,'DE 
S DRAPS DECHIRES VIOLEMMENT 
1630 DATACHAMBRE DE GARÇON.X,IUNE LAMPE 
DE CHEVET CASSEE 

1640 DATA'UN SURVETEMENT MASCULIN ARRAC 
HE.(LA LAMPE DU LUSTRE EST CASSEE 
1650 DATAI UNE CHEMISE ENSANGLANTEE,IUN 
TRAIN MINIATURE PIETINE 
1660 DATA'DES DRAPS DECHIRES VIOLEMMENT 
.SALLE DE GYMNASTIQUE.X 
1670 DATA'DES MORCEAUX DE MIROIR EPARSE 
S.'UN SURVETEMENT MASCULIN ARRACHE 
1680 DATA'UNE SERVIETTE DE BAIN PLEINE 
DE SANG.IUN PUNCHING-BALL CASSE 
1690 DATA8QUE LA VICTIME ETAIT EN TENUE 
DE SPORT.'DES BASKETS ENSANGLANTEES 
1700 DATASALLE DE BAIN,X.'DES MORCEAUX 
DE MIROIR EPARSES 

1710 DATA'UN PENOIR FEMININ DECHIRE,(DE 
L’EAU SAVONNEUSE PAR TERRE 
1720 DATA'UNE SERVIETTE DE BAIN PLEINE 
DE SANG.'UNE SAVONNETTE ECRASEE 
1730 DATAtDE LA MOUSSE A RASER SUR UN T 
ABOURET 

2000 DATAI,0,3,4,8,S,8,4,3,1,56,4,2,1,1 
,1,2.4,[,3,6,12.24,48,32,0,0 
2010 DATAI,56,0,28, 18, 18,18,28,0, A ,0,12 
.26,61,61,30. 12,0,1,0,0,0,0,0,0,0,63 
2020 DATA',63,60,59,54,52,52,54,58,8,63 
,15,55,27,11,11,27,23 
2030 DATA»,58,58,59,59,59,59,56,63,$,23 
,23,55,55,55,55,7,63 
2040 DATAI, 1,1,1,1,1,1,1,1,\,32,32,32,3 
2,32,32,32,32,.,63,0,0,0,0,0,0,0 
3000 DATA4,1,ï,1,0,4,1,1,1,0,4,1,1,1,0, 
4,1,1,1,1 

3005 DATA4,1,1,8,0,4,1,1,8,0,4,1,1,8,1, 
4,1,1,8,0,4,1,1,1,0,4,1,1,1,0,4,1,1,1 
3010 DATAO.4,1,1,1,1,4,4,1,8,0,4,4,1,8, 
0,4,4,1,8,1,4,3,1,8,1,4,3,1,1,0 
3020 DATA4,3,1,1,0,4,3,1,1,1,4,1,1,1,1, 
4,1,1,B,0,4,1,1,8,0,4,1,1,8,1 
3030 DATA3,12,1,8,1,4,1,1,1,0 
4000 DATA4.5,1,1,2,4,10,3,10,0,4,9,3,10 
,0,4,10,3,10,0,4,12,3,10,0,5,1,3,10,0 
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4010 DATA4,12,3,10,0,5,1,3,8,0,5,3,3,8, 
0,5,5,3, B, 0,5,5,3,8,0,5,5,3,8,0 
4020 DATAS,5,3,8,0,5,5,3,8,0,5,5,3,8,0, 
5,5,3,8,0,5,8,3,8,0,5,B,3,8,0 
4030 DATA5,5,3,8,0,5,5,3,8,0,5,5,3,8,0, 
5,5,3,8,0,5,5,3,8,0,5,5,3,8,0,5,5,3,8,0 
4040 DATA5,10,3,10,0,5,8,3,10,0,5,5,3,8 
,0,5,5,3,8,0,5,5,3,8,0,5,5,3,8,0 
4050 DATAS,5,3,7,1,5,5,3,7,0,5,3,3,7,0, 
5,1,3,7,0,4,10,3,10,0 
5000 60SUB10000 

5005 F0RMT05:K*=CHR*(136) +CHR$ ( 136) +C 
HR$ 1136)+CHR$(136)+CHR$(136) 

5006 K2*=CHR*(136)+CHR$(222)+CHR$(136): 
K3*=CHR*(222)+CHRt(136)+CHR*(222) 

5007 K4*=CHR*(222)+CHR*(222)+CHR*(222) 

5008 K1*=CHR$(136)+CHR*(136)+CHR*(136) 
5010 PL0T5,23,CHR*(1)+"LE DE:*+CHR$(4): 

8=1 

5020 F0RT=21T025: PL0T22.T, ’ !'+)(*+ ■ \• : NE 

XT:PL0T23,20, *Mt&W:PL0T23,26, *_ 1 

5030 F0RT=1T0INT(RND(l)1201+12 
5040 S=INT(RND(1)*6)+1 
5050 IFS=1THENS1*=K1*:S2*=K2*:S3»=K1$ 
5060 IFS=2THENS1*=K2*:S2$-K1 $ :S3*=K2* 
5070 IFS=3THENSl$=K2*s S2*=K2*:S3*=K2* 
5080 IFS=4THENS1$=K3$:S2$=K1$:S3$=K3* 
5090 IFS=5THENSlt=K3*:S2$=K2$:S3*=K3* 
5100 IFS=6THENS1*-K4*:S2*=K1*:S3*-K4* 
5110 PL0T24,22,SI*:PL0T24,23,S2*:PL0T24 
,24,53$ 

5115 HUSIC1,4,3,10:WAIT4:50UND1,0,0 
5120 N=INT(H-*-.S) :MAITH:NEXT:H=1 :HAIT120 
5130 SC=SC+S:PL0T9,1,STR*(SC):RETURN 
6000 G0SUB10000:FORT=1T06: IFPSOI (T) THE 
NNEXTELSE6020 
6010 RETURN 

6020 RS=RS+1:1 (T)=0:MUSIC1,4,4,10:MAI T1 
2:HUSIC1.4,1,10:WAIT!2:HUSIC1,4,8,10 
6030 HAIT12: MUS1C1,4,11,10:NAIT12: tlUSIC 
1,4,10,10:NAIT30:MUS ICI,4,10,0 
6040 PLAY 1,0. 1,6000 :PLOTO, 21,CHR*(17)+C 
HR$(3)+" Un Indice:":GOSUB12ÛOO 
6045 PL0T2,22,GG$:PL0T2,23,6F$ 

6050 PRINTê2,24;PX$(RS):PL0T2,26," Me 

aorisez l'indice et appuyez...' 

6060 GETH*:SC=SC+100 :PL0T9,1,STR*(SC ! : 6 
OSUB10000 
6070 RETURN 
7000 SOSUB10000 

7010 PRINT82.21:"ATTENTION,Vous n’avez 
le droit que de Faire UNE SEULE PROPOSIT 
ION' 

7020 PRINT*Al ors veuillez confiraer vot 
re choix par 0 ou N.':GETH* 

7030 IFH»="Q"THEN7060 
7040 IFH*=“N’THENRETURN 
7050 GETH*:G0T07030 

7060 60SUB10000:PLOT2,20.'Entrez les 3 
renseigneaents desires:' 

7070 PRINT@2,21 :“ Votre ASSASSIN presu 
*e:“:INPUTRP*:N*=RP*:SOSUB11000 


7080 IFCR=1THENCR=0: PR INT : PR INT " LE 
NOM EST INCORRECT. ': ZAP:NAIT120:60T07060 
7090 G0SUB10000:PRINT@2,21 ;' L’arae du 
criae:":INPUTRAt:N*=RA*:G05UB11400 
7100 IFCR=1THENCR=0:PRINT:PRINT“ CET 

TE ARME N’EXISTE PAS.’:ZAP:MAIT120:60T07 
090 

7110 GOSUB10000:PRINT82,21;* Le lieu d 
u crime:': INPUTRS*:N*=RS*:G0SUB11800 
7120 IFCR=1THENCR=0: PR INT : PRINT' CET 

TE PIECE N’EXISTE PAS.':ZAP : WA IT120 : GOTO 
7110 

7130 WAIT30:GOSUBIOOOO 
7200 IFNA»=RA*ANDNP*=RP*ANDRS*=NS*THEN2 
oc"':lsei50oo 

8000 01*=* ■♦CHR*(255)+CHR*(255)♦' ':02 
*=' '+CHR*(255 > +CHR*(255)+' “ 

8010 F0RT=1T0INT(RND(l)1101+1 
8020 U1 t=CHR* ( 7 ) +CHR* ( 161 ) +CHR* ( 192)+CH 
R* (6) 

8030 U2*=CHR*(7)+CHR*(163)♦CHR*(164)+CH 
R* (6) 

8035 PLOTXM,YM.01*:PLOTXM,YM+1.02* 

8040 XN=XM+3:IFXM>=36THENYM=YM+3:XM=3 
8050 IFYM>=16THENYH=5 

8055 Q1* : CHR*(SCRN(XM,YM))+CHR*(SCRN(XM 
♦1,YM))+CHR*(SCRN(XM+2,YM)) 

8056 Q2*=CHR»(SCRN(XM.YM+1))+CHR*(SCRNI 
XH+1,YH+1))+CHR*(SCRN(XM+2,YM+1)) 

8060 PLOTXM,YM.U1*:PLOTXM,YM+1,U2*:MUSI 
C1,2,8,0:PLAY1,0,1,200+(10IT) 

8070 NAIT5+(2*T):NEXT 
BOBO IFXM=XANDYM=YTHEN15000ELSEPING 
8090 PLOTX,Y,2s PLOTX+3,Y,6 : PLOTX,Y+1,2: 
PLOTX+3,Y+1,6 

8100 PLOTXM,YM,7:PLOTXM,YM+1,7:PLOTXM+3 
,YM,6:PLOTXM+3,YM+1,6 
8200 SC=SC+10:PL0T9,1,STR*(SC):RETURN 
9000 CR=0:GOSUBIOOOO: PRINT@2,21 ; ' Sur 
quel personnage ? (Ecrire l’or- thograph 
e"i 

9010 PRINT" entière).":INPUTNt:G0SUB110 
00 

9020 IFCR=1THEN60SUB10000:PL0T2,23,' 
MAUVAISE ORTHOGRAPHE DU NOM' 

9030 IFCR=1THENPL0T2,25,'Enfoncer une t 
ouche pour recoaaencer.* :6ETH*:60T09000 
9040 GOSUBIOOOO:PL0T12,21,N*:PRINTÉ2,22 

• * ■ 

« 

9100 IFN*=“LIEUTENAND D0UILLE"THEN60SUB 
9200 

9110 IFN*='MADAME AUNIAC'THEN60SUB9300 
9120 IFN*='SIR PIERRE'THENGOSUB9400 
9130 IFN*=“DOCTEUR H0PE"THENG0SUB9500 
9140 IFN*=*L’ABBE TISE'THENG0SUB9600 
9150 IFN*=“ALAIN TER I EUR *THENG0SUB970Û 
9160 IFN*=*HELENA 6E01RE'THENGOSUB9800 
9170 PL0T2,26,‘Enfoncer une touche pour 
la suite...':GETH*:RETURN 
9200 PRINT" Ancien officier de la R.A.F 
.adorateur de toutes les araees.* 

9210 RETURN 


9300 PRINT" Servante et feaae de aenage 
de la aai-son,pauvre et porte une perru 
que" 

9310 RETURN 

9400 PRINT* Viel aristocrate français,c 
ollection-neur d’objets anciens." 

9410 RETURN 

9500 PRINT" D’origine anglaise,docteur 
de la vic-tiae,porte aussi une perruque. 

• 

9510 RETURN 

9600 PRINT* Cure de la paroisse voisine 
,vetu d’ une soutane noire foncee.' 

9610 RETURN 

9700 PRINT' Personnage aggressif,aais f 
ervant collectionneur d’autoaobiles. ' 
9710 RETURN 

9800 PRINT' Jeune fille très riche,ne p 
ense qu’a son apparence physique.' 

9810 RETURN 

10000 FDRT=20T026:PLDTO,T,CHR*(22)+CHR* 
(4)+L*:NEXT:RETURN 

11000 IFN*<>'LIEUTENAND DOUILLE'ANDNtO 
■MADAME AUNIAC"THEN11010ELSERETURN 
11010 IFNtO'SIR PIERRE"ANDN*O'D0CTEUR 
HOPE"THEN11020ELSERETURN 
11020 IFN»<>'L’ABBE TISE”ANDN*<i'ALAIN 
TERIEUR'THENl1030ELSERETURN 
11030 IFNtO'HELENA 6E0IRE'THENCR=1 
11040 RETURN 

11400 IFN*< >"REV0LVER n ANDN*< >'C0UTEAU"A 
NDN*< >'EPEE'THEN11410ELSERETURN 
11410 IFN»<>'SERINGUE"ANDNtO*CORDE“AND 
N*<>"CLEF ANGLAISE"THEN11420ELSERETURN 
11420 IF N*< > " BUCHE ' THENCR= 1 
11430 RETURN 

11800 1FN*<>"CUISINE'ANDN*<>'SALLE A MA 
NGER'THEN1181OELSERETURN 
11810 IFN*<>'SALON’ANDN*<>'CHAMBRE DEFI 
LLE'THENl1820ELSERETURN 
11820 IFN*<>*CHAMBRE DE GARCON'ANDNtO" 
SALLE DE GYMNASTIQUE'THENl1830ELSERETURN 
11830 IFNJO'SALLE DE BAIN"THENCR=1 
11840 RETURN 

12000 GH*=LEFT*(PX*(RS).1):IFGH*="p'THE 
NGGt=" Sur l’assassin:" 

12010 IFGH*="a'THEN66*=' Sur l’arae d 

u criae:* 

12020 lFGH*='s"THEN66t=" Sur les lieu 
x du criae:’ 

12030 PX*(RS)=RI6HT*(F'X»(RS),LEN(PX*(RS 
))-l) 


12040 6H*=LEFT*(PXt(RS), 1) 

12050 IF6H*<>""AND6H»<> n 8"ANDGH*<>"t"A 
NDGH*< >"*“AND6Ht< >*X"THEN13000 


12060 IFGH*=")“THENGF*=' 

Un objet 

trouve dans la aaison:" 



12070 IFGH*=“8*THENGF*=- 

On 

a rema 

rque sur la viciae:" 



12080 IFGH*="f*THENGF*=" 

On 

a ente 

ndu.la nuit du criae:' 



12090 IFGH*='*'THENGF*=" 

On 

a rema 
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roue dans la laison:’ 

12100 IFGH*=TTHEimOOO 
12110 PX$(RS)=R1GHT$(PX*(RS),LEN<PX$(RS 
))-1):RETURN 

13000 6F$=*0n a trouve dans la demeure: 
RETURN 

14000 6F$=* On a remarque dans la 
saison:' 

14010 PX*(RT)='8U’UNE DES PIECES EST EN 
TIEREMENT DE- RANGEE':RETURN 
15000 WAIT20:PAPER1:INK7:H1RES:INK6 
15010 CURSET100,34,1 :DRAN40,0,1 :DRAH5,- 
5,1:DRAM-40,0,1 :DRAW-5,5,1 
15020 DRAW-10,30,1:DRAWO,40,1:DRAM 10,80 
,1 :DRAH40,0,1 :DRAN10,-80,1 
15030 DRAMO,-40,1 : DRAW-10,-30,1:CURM0V5 
,-5,1:DRAM10,30,i:DRAN-5,5,1 
15040 CURH0V5,-5,1 :DRAHO,40,1 :DRAN-5,5, 
1:CURM0V5,-5,1:DRAN-10,80,1:DRAN-5,5,1 
15050 CURSET120,50,1 :DRANO.55.1:CURMOV- 
10,-40,1:DRAN20,0,1 

15060 A>='LES MORTS ONT LA VIE DURE ... 

■ 

15070 FORT=1TOLEN(A$):CURSET20+(7IT),10 
,3 :CHARASC(MID$(A$,T,1)),0,1:NEXT 
15080 CURSETfc,0,0:F1LL19,1,4 
15090 PRINT' VOUS VENEZ D’ETRE ASSASS 

INE PAR L’ ASSASSIN QUE VOUS POURSUIVIEZ 

■ , 

15100 PRINT'.D0HMA6E. VOUS REUSSIREZ SU 
REMENT UN JOUR.'::P0KE618,10 
15110 PLAY7.0,0,0:F0RT=1T025 
15120 READA,B,C,D,E 

15130 MUSICl.A.B,12:MUSIC2,C,D,10:NAIT2 
5 

15140 IFE=1THENS0UND1,0,0:NA1T2ELSENAIT 

2 

15150 NEXT:NAIT 170:S0UND1.0,0:S0UND2,0, 

0 

15200 NAIT200:TEXT:PAPER5:INK6:P0KE618, 
10 

15201 PLOTIO,2,CHR$(1)+*QUI A TUE TANTE 
AGATHA?' 

15202 PL0T2,5,CHR$(4)+'La réponse a cet 
te eniqse:":PL0T2,7,'L’assassin: ’+NP» 

15203 PL0T2.8,'Le lieu du crise: '+NS*: 
PL0T2.9,'L’arse du crise: '+NA$ 

15204 PL0T7,12,CHR$(7)+'Votre score:'+S 
TR*(SC) 

15205 PLOT 12,22,CHR* (7) +*ENCORE (D/N)?' 
:GETH* 

15210 1FH$="0"THENRUN 

15220 IFH*= 'N'THENCALLDEEK (IFFFA) 

15230 60T015205 

16000 81$=' *+CHR*(255)+CHR*(255)+* ":Q 
2$=“ '+CHR*(255)+CHR*(255)+' ' 

16005 F0RT=1T0S 

16010 PLOTX,Y.Q1*:PL0TX,Y+l,02$ 

16020 X=X+3:IFX>=36THENY=Y+3:X=3 
16025 IFY >=16THENY=5:PS=1 :SC=SC+50: PLOT 
9,1,STR*(SC): PING 

16030 Q1*=CHR*(SCRN(X,Y))+CHR*(SCRN(X+l 
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,Y))+CHR*(SCRN(X+2,Y)) 

16040 Q2*=CHR*(SCRN!X.Y+1))+CHR*(SCRN(X 
+1,Y+l))+CHR*(SCRN(X+2.Y+1)) 

16050 PLOTX,Y,L1*:PLOTX,Y+l,L2*:MUSIC1, 
2,10,0:PLAY1,0,1,200:NAIT8:NEXT 
16060 IFYM< >5ANDYM< >3THEN 16070ELSERETUR 
N 

16070 PLOTXM,YH,7:PL0TXM,YM+1,7:PL0TXM+ 
3,YH,6:PL0TXN+3,YH+1,6 
16080 PLOTX,Y,2:PLOTX+3,Y,6:PLOTX,Y+l,2 
:PLOTX+3,Y+l, 6 
16200 RETURN 

20000 MAIT20:PAPER4:INK3:HIRES:INK6 
20010 CURSET80,30,3:FILL130,1.20:CURMOV 
6,-130,3: FILL130,1,23:CURM0V6,-130,3 
20020 FILL130,1,17:CURM0V6,-130,3:FILLl 
30,1,16:CURM0V6,-130,3:FILL130,1,7 
20030 CURM0V50,-130,3: FILL 130.1,6 :CURMO 
V-77,-131,1 :DRAN90,0,1:DRANO,131,1 
20040 DRAN-90,0.1 :DRANO,-131,1 :A*='FLIC 
’:F0RT=1T0LEN(A») 

20050 CURSET105+(TI8),40,3:CHARASC <MID$ 
(A*,T,l)),0,l:NExi 

20060 CURH0V-30,10,1:DRAN40,0.1:A*="BRA 
VO.":FORT=1T0LEN(A*) 

20070 CURSET 103+ (7tT), K A T : CHARASC (MI D 
*(A*,T,1)),0,1:NEXT 

20080 CURSET6.0,3:FILL20,1,5:A*='ALORS. 
..HEUREU(X-SE) ?' 

20090 F0RT=1T0LEN(A*):CURSET30+(T*8) ,10 
,3:CHARASC(MID*(A*,T,1)),0,1 :NEXT 
20100 PRINT' TOUTES MES FELICITATIONS.V 
OUS VENEZ AINSI D’OBTENIR VOTRE LICENCE 

R , 

20110 PRINT'DE DE- TECTIVE PRIVE.ENCOR 
E BRAVO...:P0KE618,10:PLAY7,0,0,0 
20120 FORT=1T025:READA,B,C,D.E:NEXT:FOR 
T=1T036:READA,B,C,D,E 
20130 HUS1C1,A,B,12 
20140 IFE<>2THENMUSIC2,C,D,10 
20150 IFE=1THENSOUND1,0,0:MAIT2ELSENAIT 

2 

20160 WA IT1S :NEXT: NA IT150:SOUND 1,0,0:SO 
UND2,0,0 
20200 G0T015200 
25000 FORT=1T057:READA,B,C,D,E 
25010 MUSICl.A.B,12:MUSIC2,C,D,10:NAIT2 
5 

25020 IFE=1THENSOUND1.0,0: NA IT 2ELSENAIT 

2 

25030 NEXT:NAIT150:S0UND1,0,0:S0UND2,0, 
0: NAI Tl 00 : CLS 

25040 PRINT:PRINT' ENFONCER UNE TOUCH 
E POUR JOUER...':GETH$:TEXT 
25050 PAPER3:P0KE48035,0: INK1:P0KE618,1 

0 

25060 PL0T2,12,'VOULEZ-VOUS VISUALISER 
LA RE6LE DU JEU*:6ETH* 

25070 IFH*='0'THEN25100 
25080 IFH*='N'THENRETURN 
25090 60T025060 

25100 CLS:PLOTO,1,CHR*(23)+CHR*(4)+' 


QUI A TUE TANTE AGATHA ?" 

25110 PRINT:PRINT:PRINT:PRINT:PRINT' 
Tante AGATHA vient de sourir.On' 

25120 PRINT:PRINT*1’a assassine.Votre r 
oie dans cette' 

25130 PRINT:PRINT'histoire ?Si«pie,Yous 
etes charge par" 

25140 PRINT:PRINT'1 a Famille de retrouv 
er l’assassin.' 

25150 PRINT:PRINT'Mais celle-ci n’est p 
as aussi catho-' 

25160 PRINT:PRINT"1ique qu’elle ne le p 
arait:Chacun de' 

25170 PRINT:PRINT'ses membres avait une 
raison pour le’ 

25180 PRINTiPRINT'ueurtre. A vous de «e 
ner a bien cette' 

25190 PRINT:PRINT'FABULEUSE ENQUETE... 
Bonne chance.' 

25200 PRINT:PRINT:PRINT:PRINT' Appuyer 
sur une touche pour la suite.':GETH* 
25210 CLS:PLOTO.1,CHR*(23)+CHR*(4)+' 

QUI-A TUE TANTE AGATHA ?' 

25220 PRINT:PRINT:PRINT:PRINT:PRINT' 
Votre parcours de détective est ' 

25230 PRINT'represente par un damier.Vo 
tre pion' 

25240 PRINT"jaune et rose doit échapper 
a Tassas-* 

25260 PRINT'sin qui trouve que vous sui 
vez Taf-' 

25270 PRINT'-faire de trop près.Votre pi 
on avance’ 

25280 PRINT'a l’aide d’un de.tandis que 
celui de' 

25290 PRINT’l’assassin aléatoirement. L 
es indices" 

25300 PRINT'qui vous permettrons de res 
oudre cette* 

25310 PRINT'enigme apparaitrons sous ce 
rtaines ' 

25320 PRINT'cases.Vous pouvez au cours 
du jeu" 

25330 PRINT'demander la description des 
suspects.' 

25340 PRINT'Attention chaque indice vou 
s tait' 

25350 PRINT'avancer dans votre enquete. 

■ 

25355 PRINT' Gare au nombre de coups li 
mites...' 

25356 PRINT:PRINT:PRINT:PRINT:PRINT:PRI 

NT:PRINT" Appuyer sur une touche 

...':6ETH* 

25357 CLS:PLOTO,1,CHR»(23)+CHR*(4)+' 

QUI A TUE TANTE AGATHA ?': PR INT:PR I NT : 

PRINT:PRINT 

25360 PRINT' Les 7 suspects:LIEUTENAND 
DOUILLE,' 

25365 PRINT'MADAME AUNIAC.S1R PIERRE,DO 
CTEUR HOPE' 

25370 PRINT'L’ABBE TISE.ALAIN TERIEUR e 












t HELENA GEOIRE':PRINT 
25380 PRINT" Les ar»es dossi b 1 es:REVOL 
VER.COUTEAU’ 

25385 PRINT",EPEE.SERINGUE EMPOISONNEE, 
CORDE' 

25390 PRINT'CLEF AN6LAISE ou BUCHE':PRI 

CijL , Texas 
w * Instruments 



Langage : Basic Etendu 


Mustapha Nih 

La grande passion de Mustapha, 
c'est la micro-informatique. Il est ac¬ 
tuellement en 1ère au lycée et pro¬ 
gramme depuis trois ans sur son Tl 
99. Plus tard, il aimerait se lancer 
dans une carrière d’informaticien. 

S 'évader de cette prison est 
sûrement plus effrayant qu’y 
rester : une multitude de mons¬ 
tres assoiffés de sang vous pourchas¬ 
se dans les souterrains. Pour en sortir, 
il faut parcourir quatre tableaux. Pre¬ 
mier tableau : avancez avec S, reculez 
avec D, sautez avec la barre d’espace ; 
la montée des échelles est automati¬ 
que. Deuxième tableau : sautez avec la 
barre d’espace pour attraper la poi¬ 
gnée qui passe et éviter le fantôme, 
puis pressez une nouvelle fois la barre 
d’espace pour lâcher la poignée. 
Troisième tableau : il faut arriver en bas 
de l’échelle ; pressez X pour descen¬ 
dre, E pour monter. Quatrième tableau : 
il faut tuer les monstres avec une 
arbalète avant qu’ils ne s’emparent de 
la clé vous menant à la liberté ; le 
maniement de l’arbalète s’effectue par 
les touches X et E, le tir par la barre 
d’espace. ■ 


Mustapha NIH 


10 CALL DEBUT 

20 DATA 262, 1,330, 1,392,1,440,1,466,1,37 
0,1,392,1,330,1,349,2,440,2,523,2,587,2, 
622,2 

30 DATA 494,2,523,2,440,2,392,3,494,3,58 
7,3,659,3,698,3,554,3,587,3.494,3 
40 DATA 349,2,440,2,523,2,587,2,622,2,49 

4.2.440.2.262.1.330.1.392.1.440.1.466.1 
50 DATA 370,1,392,1,330,1,262,1,196,1,26 
2,1,196,1,262,1,196,1,262,1,196,1,262,1, 

262.1.294.1.330.1 

60 DATA 349,2,262,2,349,2,262,2,349,2,26 


NT 

25400 PRINT" Les lieux du cri«e:CUISIN 


ASTIQUE ou' 

25430 PRINT'SALLE DE BAIN.*:PRINT:PRINT 


E.SALON.' 

25410 PRINT'SALLE A NAN6ER.CHAMBRE DE F 
ILLE.CHAH-' 

25420 PRINT'BRE DE GARÇON,SALLE DE 6YMN 


25440 PRINT' Meaorisez cette liste nece 
ssaire a l’enquete...' 

25450 PR INT: PRINT: PR INT: PRINT "Appuyer s 
ur une touche pour jouer...':6ETH$:RETURN 



2,2,349,2,330,2,294,2,262,1,196,1 
70 DATA 262,1,330,1,392,1,440,1,466,1,37 
0,1,392,1,330,1,349,2,440,2,523,2,587,2 
80 DATA 392,1,262,1,262,1,4,4 
90 RAND0MIZE :: CALL SCREEN(2): : CRE=2 : 

: SC=0 :: LE=1 :: V-0 :: CALL CLEAR 
100 REM DEF. CARACT. 

110 CALL CHAR(64,'00007CFFFCE04040' ) 

120 CALL CHAR(103, “ 1818183C5A183C64* ,104 
,'185A3C1818668100",105,"1818183C5A18181 
8') 

130 CALL CHAR<112, '3CFFDB7E7E66001803070 
FOEO7O30007FFFF813CFFFF0OFFCOE0F07OEOCÛ0 
0E0') 

140 CALL CHAR(116,"0FÛFOF0707O7OFOFFFFFF 
FC81000000") 

150 CALL CHAR(118,'FOFOFOEOEOEOFBF8"): : 
CALL CHAR(119,'1810181010382838") 

160 CALL CHAR(98,"24BD99FF187E1866387CFE 
92FEFEAAAA3C7ED8FF5A42426642A5427EE7FF42 
E7'l 

170 CALL CHAR(96,'3C3C3C3C3C3C3C3C") 

180 CALL CHAR(40,"81FF818181FF8181") 

190 CALL CHAR(136,'FF80B080FF101010',34, 
' AA55AA55AA55AA55',36.'5A5A3C1818181818' 
) 

200 CALL CHARI35,'1B2442423COOOOOO") 

210 CALL CHAR(120,'00003C7E7EFF187E',121 
,'00007CFFFCE04040'1 

220 CALL CHAR(123,'2224242422428281BD425 
A422466A518') 

230 CALL CLEAR :: CALL DELSPR1TE (ALL) : : 
FOR T=5 T0 B :: CALL C0L0R(T,16,1): : NE* 
T T 

240 REM - 

250 CALL HCHARI21,1,136,32):: CALL HCHAR 
(17,1,136,32):: CALL HCHAR(13,1,136,32): 

: CALL HCHAR(9,1,136,32) 

260 CALL HCHAR <3,9,136,16): : CALL VCHAR( 
18,4,40,3):: CALL VCHAR(14,4,40,3) 

270 CALL VCHAR(10,4,40,3) 


280 CALL HCHAR(4,9,136,16J: : CALL HCHAR! 
5,1,136,32) 

290 DISPLAY AT(14,1):" C :: DISPLAY ATI 

14.1) :' C 

300 .DISPLAY AT(18,1): * C 
310 DISPLAY AT( 1,1):" HISC0RE : 

SCORE : ' IF CRE=-1 THEN 830 
320 DISPLAY AT(1,15)SIZE(3):RPT*(*g',CRE 
); 

330 DISPLAY AT(4,10)SIZE(10):' PRISON 

■ 

340 DISPLAY AT(3,1)SIZE(6):HI :: DISPLAY 
AT (3,23) SI ZE (6) : SC 
350 DISPLAY AT(7,2)SIZE(1):'m" 

360 CALL COLORd, 16,1,9,15,1,2,11,1,14,1 

6.9.10.6.1.3.16.1.4.16.1.11.11.1) 

370 RESTORE 20 

380 READ TP,FR :: ON FR GOTO 390,410,430 
,370 

390 CALL SOUND(100,TP,1,TP+2,2,TP+3,3): : 
CALL SOUND(100,165,1,196,1,262,1) 

400 60T0 450 

410 CALL SOUND(100,TP,1,TP+2,2,TP+4,3): : 
CALL SOUNDdOO, 175,1,220,1,262,1) 

420 GOTO 450 

430 CALL SOUND(100,TP,1,TP+2,2,TP+4,3):: 
CALL SOUNDdOO, 190, 1,247,1,294,1) 

440 GOTO 450 

450 DISPLAY AT(23,3):' PRESSEZ C POUR C0 
MMENCER' :: CALL KEY(0,K,S): : IF K=67 TH 
EN *60 ELSE 380 

460 CALL HCHAR(23,1,32,32):: IF LE>4 THE 
N 480 
470 REM 
480 V=0 

490 CALL SPRITE(Il f 103,16,153,231) 

500 F=151 :: CALL SPRIÎEÜ2,101,12,151,1 
0,0,6+LE.I3,101,12,151,90,0,6+LE,14,101, 
12,151,170,0,6+LE) 

510 CALL PATTERN(11,103):: CALL POSITION 
(11,A,B):: CALL L0CATE(Il,F,B) 
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FICHE PROGRAMME 


520 IF B>231 THEN CALL LOCATE(il,F,230) 
530 IF B<35 THEN 680 

540 CALL COINC(ALL,CRA): : IF CRA=-1 THEN 
640 

550 X=0 ï■ CALL KEY(0,K,S): : IF K=6B THE 
N XM ELSE IF K=83 THEN X=-4 :: IF XOO 
THEN CALL PATTERN(11,105) 

560 CALL MOTION(ttl,0,Xtl.2) 

570 CALL KEY <0,K,S): : IF S=0 THEN 510 
580 IF K<>32 THEN 510 
590 X=-4 

600 CALL PATTERN(il,104) 

610 CALL SOUND(-100,-3,1):: FOR T=-16 TO 
15 STEP 2 :: CALL MOTION(Il,T.X*1.2):: 
CALL COINC(ALL,C): : IF C=-l THEN 640 
620 NEXT T CALL MOTION(il,0,Xt2>: : CA 
LL PATTERN(il,105): : 60T0 510 
630 REH 

640 CALL H0TI0N(il,0,0):: CALL COLORIil, 
7):: FOR T=500 TO 210 STEP -15 :: CALL S 
ÜUND(-4,T,0,T+l,0,T+2,0): : NEXT T 
650 IF CRE=0 THEN 830 
660 CRE=CRE-1 :: DISPLAY AT(1,14)SI2E(3) 

:RPT$("g *,CRE); 

670 SOTO 480 

680 IF V=3 THEN 690 ELSE 710 

690 CALL SOUND(100,789,0):: CALL HCHARI7 

,4,32) 

700 SOTO 750 

710 CALL MOTION(il,0,0): : CALL LOCATE(Il 
,F,24): : CALL DELSPRITE(i2,i3,*4) 

720 FOR T=F TO F-31 STEP -1 :: CALL LOCA 
TE (il, T, 24 ) : : NEXT T :: SC=SC+250 :: 60S 
UB 1810 

730 CALL HOTIONÜl,0,-15):: FOR TM TO 1 
91 :: NEXT T :: CALL MOTION(il,0,0) 

740 V=V+1 :: ON V SOTO 760,780,800,750 

750 SOSUB 930 :: 60T0 950 

760 CALL SPRITE(12,98,15,120,1,0,7+LE,I3 

,98,15,120,100,0,7+LE,i4,98,15.120,180,0 

,7+LE):: F=120 

770 GOTO 510 

780 CALL SPRITE(#2,99,4,88,30,0,5+LE,#3, 
99,4,88,100,0,5+LE,#4,99,4,88,180,0,5+LE 
):: F=88 
790 GOTO 510 

800 CALL SPRITE(12,100,11,55,1,0,9+LE,13 
,100,11,55,100,0,9+LE,14,100,11,55,180,0 
,9+LE): : F=57 
810 60T0 510 
820 REH 

830 DISPLAY AT(23,1):“ 6AHE - OVE 

R “ :: FOR TM TO 500 :: NEXT T 
840 IF SDHI THEN 850 ELSE 870 
850 FOR TM TO 7 :: CALL SOUND(100,110,1 
,700,1):: HI=SC :: DISPLAY AT(3,DSIZEI6 
) :HI : : DISPLAY AT(23,1):“ BEST - 

SCORE “ 

860 CALL SOUNDdOO, 110,0) : : NEXT T 
870 DISPLAY AT(23,1):“ VOULEZ-VOUS REJO 
UER 0-N ?“ 

880 CALL KEY(0,K,S): : IF S=0 THEN 880 


890 IF K=79 THEN CRE=2 :: LE=1 :: SC=0 : 
: CALL DELSPRITE(ALL):: GOTO 320 
900 IF K=78 THEN CALL DELSPRITE(ALL): : C 
ALL CLEAR :: STOP 
910 60T0 880 

920 REH . 

930 CALL DELSPRITE(ALL):: CALL CLEAR :: 
FOR TM TO 24 :: CALL HCHARIT,1,136,32): 
: NEXT T :: FOR TM TO 24 :: CALL HCHARI 
T,1,32,32):: NEXT T :: RETURN 

940 REH.— 

950 CALL CHAR(106,“FF80BF817C020100FF01F 
D813E408000'):: CALL COLOR(2,11,1): : CAL 
L CHAR<33,“FF18244281FF0000') 

960 FOR T=3 TO 31 STEP 5 :: CALL VCHARd 
,T, 106,24):: CALL VCHARd,T+l, 107,24):: 
NEXT T 

970 FOR T=8 TO 24 STEP 5 :: CALL VCHARd 
0,T,32,11):: CALL VCHAR(10,T+l,32,11 ) : : 
NEXT T 

980 CALL HCHAR (13.1,32,3) : : CALL HCHARd 
3,4,33,4):: CALL HCHAR(13.25,33,8): : CAL 
L VCHAR(14,6,40,11):: CALL VCHûR(14,26,4 
0,11) 

990 CALL HCHARd, 1,34,32):: CALL HCHAR(8 
,1,32,3214):: CALL HCHAR(12,1,32,32) 

1000 CALL HCHAR(10,1,33,3):: CALL HCHARI 
12,5,119) 

1010 CALL SPRITE(13,35,15,60,50,0,-5-LE, 
14,35,15,60,150,0,-5-LE) 

1020 CALL SPRITE(#5,98+INT(RNDJ31+1,16,2 
50,200,-3-LE,0) 

1030 CALL SPRITElil,36,16,88,200) 

1040 CALL COINC <ALL.CRA): : IF CRA=-1 THE 
N 1250 

1050 CALL KEY(0,K,S): : IF K=32 THEN 1070 
1060 60T0 1040 

1070 FOR T=-17 TO 0 :: CALL HOTIONÜl,T, 
0):: CALL COINC(ALL,CRA):: IF CRA=-1 THE 
N 1120 
1080 NEXT T 

1090 FOR T=0 TO 15 :: CALL HOTIONÜl,T,0 
):: CALL C0INC(I1,I5,13,CRA>:: IF CRA=-1 
THEN 1250 

1100 NEXT T :: CALL HOTIONÜl,0,0) : : 60T 
0 1030 

1110 SOTO 1050 

1120 CALL SPRITElil,36,16,64,200,0,-5-LE 
):: CALL NOTION(15,0,0) 

1130 CALL KEY(0,K,S): : IF K=32 THEN 1150 
1140 GOTO 1130 

1150 CALL POSITION(il,A,B): : IF B>53 OR 
B<24 THEN 1230 

1160 FOR T=0 TO 21 :: CALL HOTIONÜl,T,0 
):: NEXT T s: CALL HOTIONÜl,0,0) 

1170 FOR TMO TO 12 :: CALL HCHARIT,1,32 
,3):: CALL HCHAR(T+l,1,33,3) 

1180 NEXT T 

1190 CALL SOUNDdOO,789,0):: CALL HCHARI 
12,5,32) 

1200 FOR H=B TO 1 STEP -3 :: CALL LOCATE 
(11,88,H):: CALL PATTERN(il.103): : FOR T 


M TO 30 :: NEXT T :: CALL PATTERN(il,10 
5):: FOR TM TO 30 :: NEXT T 
1210 NEXT H 

1220 SC=SC+1000 :: CALL HOTIONÜl,0,0) : : 
60T0 1280 

1230 FOR T=A TO 240 STEP 2 :: CALL LOCAT 
E(il,T,B): : NEXT T 

1240 CREMRE-1 :: SOSUB 930 :: SOTO 230 
1250 CALL NOTION(15,0,0,11,0,0):: FOR T= 
200 TO 110 STEP -2 :: CALL SOUNDdOO,-5, 
0,T,0): : NEXT T 

1260 CRE=CRE-1 :: SOSUB 930 :: 60T0 230 

1270 REH - 

1280 SOSUB 930 

1290 CALL CHAR(102, , 000041FF410000“> 

1300 CALL VCHARd,31,136,24):: CALL VCHA 
R(l,2,136,24):: CALL HCHAR(23,1,136,96) 
1310 CALL VCHAR(1,32,40,24):: CALL VCHAR 
(1,4,40,24):: CALL HCHAR(24,4,119) 

1320 CALL SPR1TEÜ7,36,16,2*8,24) 

1330 0=0 

1340 FOR T=88 TO 176 STEP 16 :: 0=0+1 :: 
CALL SPRITEÜQ,102,16,T,230):: NEXT T 
1350 CALL SPRITE(I10,98,7,10,150,0,13,11 
1,99,8,22,250,0,-15,112,100,11,35,101,0, 

15) 

1360 CALL SPRITE(I13,9B,14,47,120,0,-17, 
114,99,6,59,20,0,-20,115,101,9,70,180,0, 

16) 

1370 REH 

1380 IMNT (RND*6)+1 :: CALL SOUND(150,-5 
,0):: CALL HOTIONÜl,0,-70) 

1390 CALL NOTION(#7,0,0) 

1400 FOR TM TO 7 :: CALL COINC(ALL.CAR) 
:: IF CAR=-1 THEN 1470 
1410 CALL POSITION(17,A,B): : IF A>185 TH 
EN SC=SC+500*LE :: CALL SOUND(100,789,0) 
:: CALL HCHAR<24,4.32): : 60T0 1500 ELSE 
IF AM6 THEN 1420 

1420 Y=0 :: CALL KEY(0,K,S):: IF K=69 TH 

EN YM ELSE IF K=88 THEN Y=-4 

1430 IF K=69 AND A<M6 THEN 1440 ELSE 14 

50 

1440 AM6 :: GOTO 1420 

1450 CALL MOTION(17,-YI2,0): : NEXT T 

1460 CALL HOTIONÜl,0,0):: CALL LOCATE (i 

1,72+16*1,230):: 60T0 1370 

1470 CALL HOTIONÜl,0,0,«7,0,0):: CALL C 

OLOR(17,7): : CALL SOUND(-400,700,0): : CA 

LL SOUND(-20,200,0,-4,0) 

1480 CRE=CRE-1 :: SOSUB 930 :: LE=LE+1 : 
: SOTO 230 

1490 REH - 

1500 SOSUB 930 

1510 CALL COLOR(10,6,1) 

1520 FOR TM TO 31 STEP 3 :: CALL VCHAR! 
1,T,106,24):: CALL VCHARd,T+l,107,24):: 
NEXT T 

1530 FOR TM TO 19 :: CALL HCHARIT,7,32, 
24):: NEXT T 

1540 CALL VCHAR(6,30,136,14):: CALL VCHA 
R(6,7,136,14): : CALL HCHAR(19,7,136,24): 
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: CALL HCHAR(6,10,136,21) 

1550 CALL VCHAft (11,25,34,4) : : CALL HCHAR 
(19.8.119) 

1540 REH 

1570 CALL SPR1TE(12,99, 14,30,72,#3,99,11 
,30,82,«4,99,14,30,92) 

1580 N=2 

1590 CALL SPRITE(11,102,14,100,220) 

1400 CALL LOCATE(#W,30,60): : CALL MOTION 
1*N,4+LE,0) 

1410 Y=0 :: CALL KEY(0,K,S):: 1F K=69 TH 
EN Y=4 ELSE IF K=88 THEN Y=-4 
1420 CALL M0TI0N(I1.-Y*3,0) 

1430 CALL POSITION(il,A,B): : IF A>135 TH 
EN A=135 

1440 IF A<50 THEN A=50 
1450 CALL LOCATE(tl,A,B) 

1440 CALL POSITION (IN,C, D) : : IF 0145 TH 
EN 1780 

1470 CALL KEY(0,K,S): : IF S=0 THEN 1410 
1480 IF K=32 THEN 1490 ELSE 1610 
1690 1F (A>79 AND A<109)THEN 1610 
1700 CALL NOTION(11,0,-50):: FOR T=1 TO 
45 :: CALL COINC(ALL,CAR): : IF CAR=-1 TH 
EN 1720 

1710 NEXT T :: CALL MOTION(11,0,0): : CAL 
L LOCATE(11,100,8):: 60T0 1610 
1720 CALL DELSPRITE(Il ) : : CALL NOTION(IN 
,0,0):: CALL COLOR(IN.ll):: CALL PATTERN 
(IN,124):: FOR T=200 TO 110 STEP -2 
1730 CALL SOUND(-600,T,1): : NEXT T :: CA 
LL DELSPRITE(IN) 

1740 IF N=4 THEN 1760 
1750 N=N+1 :: 60T0 1590 
1760 DISPLAY AT(8,8)SIZE<17):‘BONUS 1000 
POINTS" :: SC=SC+1000 
1770 FOR T=30 TO 1 STEP -1 :: CALL SOUND 
(100,700,T,701,T,702,T):: NEXT T :: LE=L 
E+l :: 60TQ 230 

1780 CALL HCHAR(19,8,32): : CALL SPRITE(I 
1,119,11,155,60,-6,0):: CALL MOT ION(#N,- 
6,0) 

1790 FOR T=1 TO 1000 :: NEXT T :: CALL H 
OTIQN(I1,0,0,IN,0,0):: DISPLAY AT(8,10)S 
1ZE(12):“PAS DE BONUS" 

1800 FOR T=1 TO 1000 :: NEXT T :: LE=LE+ 
1 :: 60SUB 930 :: 60T0 230 
1810 DISPLAY AT(3,23)SIZE(6):SC :: 60T0 
1830 

1820 DISPLAY AT(1.14)SIZE(4):RPT*("g‘,CR 
E): 

1830 RETURN 

1840 CALL SPRITE(I13,123,8,50,50) 

1850 DATA 330,100,392,70,392,70,392,50,3 
49,100,392,70,392,70,392,50,330,100,392, 
70 

1860 DATA 392,70,392,50,349,100,392,100, 
262.100,20000,1 

1870 RESTORE 1850 :: FOR T=1 TO 16 :: RE 
AD B,A :: CALL SOUND(A*2,B,1,B+l,l,B+2,1 
):: NEXT T 

1880 CALL KEY(0,K,S):: IF K=32 THEN RETU 


RN ELSE 1870 

1890 REN - 

1900 SUB DEBUT :: CALL CLEAR :: CALL SCR 
EEN(2): : FOR C=1 TO 14 :: CALL C0LQR(C,2 
,1):: NEXT C 

1910 RESTORE 1920 :: FOR 1=1 TO 23 :: RE 
AD CAR,CAR* :: CALL CHAR(CAR,CAR*): : NEX 
T 1 

1920 DATA 35,OOOOOOOOOOOOOOFFOIOIOIOIOIO 
101018080808080808080,39,010204081020408 
0804O201OO8O4O2O1FF0OOOOOO00OOOFF8O8OBO8 
0808080FF 

1930 DATA 43,000000000106187F01061860800 
OOOFF, 47, CO3OOCO3OOOOO0FF0OOOOO0ÛCO3O0CF 
F, 50, OFOF0703ÛOOOOOOOFOFOEOCOOOOOOOOO1B2 
44242818181FF 

1940 DATA 55,0000000007F8837C,58,0000000 
FF007F8000007F8037C80000000FOOCE21109060 
0O03F407F402O1F00 

1950 DATA 62,OOFCO2FEO2O4F8O0.64.2424242 
4FF242424,66,80808080E080808090909090909 
09090,70,0C1211FC10080403,74,6090121F122 
04080 

1960 DATA 80,909090909090909F09090909090 
909F9,84,09090909090909099090909090AOC08 
0,87,090909090909090F,89,000000000003040 
F 

1970 DATA 90.0000010E718E708019669860800 
00000,94,3C3C3C3C3C3C3C3C,97,008ADAAAAAB 
A8A00006E8A8A8F8969000030484949493000000 
0004745459700 

1980 DATA 96,3C4299A1A199423C.93,0101010 
1010101FF,54.01020408102040FF,101,000000 
00030c30c0030c30c000000000 

1990 REH - 

2000 DISPLAY AT(1,1 ):‘ Itttltltttttttttt 
llttllltr :: DISPLAY AT(2,1):"*( 

’V 

2010 DISPLAY AT(3,1): "* ( X 
’ X" :: DISPLAY AT(4,1):"* ( 

X ’ X" 

2020 DISPLAY AT(5,1):"* («****«*#***»* 
Ittlt’ X" :: DISPLAY AT(6,1):‘* * 


X X X" 

2030 DISPLAY AT(7,1):"* t AAAA +,/0 
IIIIX X* :: DISPLAY AT(8,1):"* * A 

AAA 23 CYZCXX X" 

2040 DISPLAY AT (9,1):'* * AAAA 

CT XX X" :: DISPLAY AT(lO.l):"* * 

CT XX X" 

2050 DISPLAY AT(1 U):"t * 8B8BC FJ 
PB XX X" :: DISPLAY AT(12,1):“* * 

tltlltlt CT XX X" 

2060 DISPLAY AT(13,1):** *6»*»ttleflit 
IUT IX X" :: DISPLAY AT(14,1):** ’* 
mille* Ne* ( X" 

2070 DISPLAY AT(15,1):"* ’ 7: 

i< (4 X" :: DISPLAY AT(16,1):"* ’ = 
> * X" 

2080 DISPLAY AT(17,l)i**’ 

(X" :: DISPLAY AT(18,2):RPT*(“) 

" ,26) 

2090 CALL VCHAR(19,3,36,5): : CALL VCHAR( 
19,30,37,5):: CALL HCHAR(23,4.35,26) 

2100 DISPLAY AT(20,4)SIZE(21):‘- LA BRAN 
DE EVASION -" :: DISPLAY AT<22,5)SIZE<19 
):■' 1985 NIH M abcd" 

2110 FOR C=1 TO 14 :: CALL COLOR(C,11,1) 
:: NEXT C 

2120 RESTORE 2130 :: FOR 1=1 TO 57 :: RE 
AD D.N :: CALL SOUND(D*300,N,0): : NEXT I 
2130 DATA 1,494, 1,523,1.5,587,.5,587,1,6 

59.1.587.2.494.1.523.1.494.1.5.440.. 5.44 
0, 1,494, 1,440,2,392 

2140 DATA 1,494,1,523,1.5.587,.5,587, 1,6 

59.1.587.2.494.1.523.1.494.1.5.440.. 5.44 
0,1,494,1,440,2.392 

2150 DATA 1,587, 1,784, 1,880, 1.5,988,.5,9 

88,1,988,1,880,1.784 

2160 DATA 1,587, 1,659,1.5,659,.5,587,.5, 

659.1.587,2.5.494 

2170 DATA 1,494,1,523,1.5,587,.5,587,1,6 

59.1.587.2.494.1.523.1.494.1.5.440.. 5.44 
0,1,494,2,392,7,196 

2180 CALL CLEAR :: CALL CHARSET :: SUBEN 
D 
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Machine : Apple Ile 
Langage : Basic 


Sylvain Gagelin 

Sylvain, vingt-deux ans, prépare ac¬ 
tuellement le concours d'inspecteur 
de police. Ce sportif accompli prati¬ 
que la micro depuis deux ans. Il a 
commencé son initiation sur Thom¬ 
son et pianote aujourd'hui sur Apple. 
A déjà programmé quelques jeux, un 
programme de comptabilité ici pré¬ 
sent et un programme pour les cota¬ 
tions en bourse. Part au service 
militaire. 

S i vous voulez gérer jusqu'à cinq 
comptes simultanément, ce pro¬ 
gramme vous intéresse. Vous 
pouvez entrer des opérations, les 
modifier, les lister, les rechercher et en 
faire l’état. Les explications concernant 
les manipulations sont affichées à 
l'écran. ■ 


Sylvain GAGELIN 

5 REM === COMPTABILITE === 

6 : 

10 PRINT CHRt (4)s“PR£3" 

15 ONERR GOTO 160 

20 POKE 6.0: POKE 7.0: GOTO 600 

24 : 

25 REM === AFFICHAGE TABLEAU === 

26 : 

30 HOME : HTAB (40 - LEN (Nt(B)> / 2): 
INVERSE : PRINT “ -;N*(B):" *: NORMAL : 
PRINT TAB( 18):: FOR I - 0 T0 45: PRIN 
T NEXT : PRINT 
35 PRINT T AB ( 18)" RETRAITS 

! VERSMENTS l": FOR 1=0 
T0 79: PRINT NEXT 
40 PRINT "R ! DATE 1 MONTANT : 
OBJET 1 MONTANT : 0B‘:"JET 1 

SOLDE '*:: FOR P = 0 T0 79: PRINT 
NEXT 

45 IF A = 5 THEN 1615 

49 : 

50 REM === AFFICHA6E DONNEES === 

51 : 

55 Z = 0: PRINT " 1 

60 IF A = 1 AND F > = 0 AND F < 14 THE 

N FOR I = 1 T0 13: 60T0 80 

65 IF A = 1 THEN F0F: I = F - 12 TO F: 

GOTO 80 




3) AND F > = 0 AND 
: 1 T0 10: 60T0 80 
3) THEN FOR I = F 


70 IF (A = 2 OR A 
F < 11 THEN FOR I 
75 IF (A = 2 OR A 
- 9 T0 F: GOTO 80 

80 Z = Z ♦ 1: IF Z = 11 AND (A = 3 OR A 
= 2) THEN Z = 1 


iNF$(B): GOTO 865 
175 IF ER = 254 THEN 1240 
180 IF ER = 255 THEN TEXT 
185 1F ER = 120 THEN 610 
190 TEXT : END 
199 : 


85 VTAB (6 + Z): IF I < 10 THEN PRINT 
•!■: TABI 4)1: 

90 IF I > 9 AND I < 100 THEN PRINT V 
! TABI 3)1: 

95 IF 1 > 99 THEN PRINT TABI i)*'*:I; 
100 PRINT " ■ :D*11): TABI 15)" !*: 

105 IF R$(I) = ■R" THEN PRINT TABI 26 
- LEN IM$(I)))H*(I): , Frs: *:0t(I): TAB 
I 41)" : ! * : TABI 

76 - LEN <S*(I)))S«II):"Frs GOTO 1 
20 

110 IF Rt(I) = “V THEN PRINT TABI 29 
)•: TABI 51 - LEN (M$(D) 

IMKDi'Frs: , :0$(I): TABI 66)"': TABI 
76 - LEN (SlinnSKDi’Frs !“:: GOTO 1 
20 

115 1F Ri(I) = ■■ THEN PRINT ■ 

. i . ■. • 

i i •. 

120 IF T = 1 THEN ON A 60T0 920.1023.2 
00.,1630,1770 

123 NEXT : FOR P = 0 T0 79: PRINT ■-*:: 
NEXT : PRINT 

125 ON A GOTO 910.1010.200..1630,1770 

129 : 

130 REM === QUESTION === 

131 : 

135 VTAB (22): HTAB (2): INVERSE : PRIN 
T " Voulez-vous continuer 0 10":*/N) * : : 
GET BS: PRINT BS: NORMAL 
140 IF BS < ) "0* AND B» < > "N" THEN 

135 

145 IF Bt = •0” THEN Dit = *“:Mt = ": 
HOME : 60T0 1240 
150 TEXT : 60T0 610 

159 : 

160 REM === TRAITEMENT DES ERREURS = 

161 : 

165 ER = PEEK (222) 

170 IF ER = 2 OR ER = 5 OR ER = 20 THEN 
N (B) = I - 1:F = N(B): PRINT DS:‘CLOSE’ 


200 REM === ENTREE DONNEES === 

201 : 

205 IF A = 3 THEN N(B) = N(B) + 1:1 = N 
(B) 

210 IF A = 2 THEN I = VAL (Ct) 

215 VTAB (20): CALL - 958: PRINT ■ DES 
16NATI0N",“DATE",“MONTANT*,“OBJET*,“S0LD 
E* 

220 VTAB (22): PRINT TABI 2)1: TABI 6) 
*.“:: HTAB (6): GET Rt(I): PRINT Rt(I) 
225 IF RS11) = ■“ OR LEN 1RS11)) < > 

1 OR 1RS 11) < > "R" AND RS 11 ) < > *V* 
AND RSII) < > “F*) THEN 220 
230 IF RSII) = “F" AND A = 3 THEN RSII) 
= ““: NI B) = N(B) - 1: 60T0 610 
235 IF RSII) = “F* THEN RSII) = 60T 

0 610 

240 DS(I) = 

245 VTAB (22): HTAB (15): PRINT DSII - 
1):: HTAB (15): GET Bt: GOTO 260 
250 H = 15 + LEN (DS11) ) 

255 VTAB (22): HTAB (15): PRINT Dt(I); : 
HTAB (H): GET Bt 

260 IF ASC (Bt) = 13 OR ASC (Bt) = 8 
OR ASC (Bt) = 21 OR ASC (Bt) > 47 AND 
ASC (Bt) < 58 THEN 270 
265 GOTO 250 

270 IF ASC (Bt) = 13 THEN Dt(I) = Dt(l 
) + RIGHTt (DS(1 - 1),8 - LEN (DS(I))) 

: 60T0 315 

275 IF LEN (Dt(D) = 0 AND ASC (Bt) = 
8 THEN 250 

280 IF ASC (Bt) = 8 AND LEN (Dt(I)) = 
1 THEN Dt(I) = “*: GOTO 250 
285 IF ASC (Bt) = 8 THEN Dt(I) = LEFT 
i (Dt(I), LEN (Dt(II) - 1): GOTO 250 
290 IF LEN (Dt(I)) = 7 THEN 310 

295 IF ASC (Bt) = 21 THEN DS(I) = Dt!I 

) ♦ MIDt (Dt(I - 1), LEN (Dt(I)) + 1.1) 
: GOTO 250 

300 IF LEN (Dt(I) ) = 0 OR LEN (DttD) 

= 3 OR LEN (DtlD) = 6 THEN Dt(I) = Dt 
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(I) + B$: GOTO 250 

450 VTAB (21): CALL - 958: PRINT * ": 

655 VTAB (18): PRINT 1 8 : QUITTER LE P 

3Ü5 IF LEN (D*(I)) = 1 OR LEN (D*(I)) 

INVERSE : HTAB (28): PRINT * *:"Ecriture 

R06RAHHE" 

= 4 THEN Dt!I) = D*(I) + Bt + */*: 60T0 

sur disquette ": NORHAL 

660 FOR I = 0 TO 16: HTAB (39): VTAB (3 

250 

455 PRINT Dt;"OPEN*:NFt(B):".L40‘ 

+ I): PRINT ■(■: NEXT 

310 Dtil) = D$!I) + B* 

460 IF A = 3 THEN PRINT D» : * WR I TE * : NFt 

665 VTAB (4): HTAB (41): PRINT 1 1 : ET 

315 VTAB 122): HTAB (15): PRINT Dt!I) 

(B);‘.RO’: PRINT I 

AT DU COHPTE 1 

320 (1$!I) = " 

465 PRINT D*: 1 NRITE 1 :NFt(B): 1 .R 1 :I 

670 VTAB (7): HTAB (41): PRINT 1 2 : HO 

325 VTAB (22): HTAB (32): PRINT “. 

470 PRINT Rt(I): PRINT D»(I): PRINT Ht( 

DIFICATION DU COHPTE" 

HTAB (32): GET B»: GOTO 340 

I): PRINT Otll): PRINT St!I) 

675 VTAB (10): HTAB (41): PRINT 1 3 : C 

330 H = 32 + LEN <M$(I)) 

475 PRINT Dt:"CLOSE":NF»(B): IF A = 3 T 

REATION-HISE A JOUR DU COHPTE" 

335 VTAB (22): HTAB (32): PRINT Ht(I);: 

HEN 1110 

680 VTAB (13): HTAB (41): PRINT 1 4 : R 

HTAB (H): GET Bt 

479 : 

ECHERCHE D’UN OPERATION 1 

340 IF ASC (B*) > 47 AND ASC (Bt) < 5 

480 REH “= CORRECTION DES SOLDES === 

685 VTAB (16): HTAB (41): PRINT 1 5 : I 

8 THEN 350 

481 : 

HPRESSION DU COHPTE SUR IHPRIH 1 :"ANTE" 

345 1F ASC (Bt) < > 13 AND ASC (Bt) 

485 PRINT Dt:"OPEN";NFt(B);",L40": FOR 

690 VTAB (19): HTAB (41): PRINT 1 E : E 

< > B AND ASC (B$) < > 21 AND ASC (B 

E = ! + 1 TO N (B) 

RREUR CHOIX 1ère COLONNE 1 

t> < >32 AND ASC (Bt) < > 46 THEN 33 

490 IF R»(E) = "R" THEN S = VAL (S»(E 

695 VTAB (20): FOR I = 0 TO 79: PRINT 1 

0 

- D) - VAL (Ht (E ) ) : S (E> = FN F(S):S»( 

NEXT : VTAB (23): FOR I = 0 TO 79: 

350 1F ASC IB») = 13 THEN 382 

E) = STRt (S(E)) 

PRINT NEXT 

355 IF ASC (B*) = 21 THEN 330 

495 IF Rt(E) = •V THEN S = VAL (St(E 

700 VTAB (21): PRINT 1 TAPEZ DEUX CHIFF 

360 IF ASC (Bt) = 8 AND LEN (N»(I)> = 

- D) + VAL (Ht (E) ):S!E) = FN F(S):St( 

RES : choix 1ère colonne ouis ■j'choix 2 

0 THEN 330 

E) = STRt (S(E>) 

ène colonne ■: HTAB (38): PRINT M." 

365 IF ASC IB») = 8 AND LEN <H»(I>) = 

497 IF LEN (St(E>) < 2 THEN 505 

705 VTAB (22): HTAB (38): 6ET Bt: PRINT 

1 THEN Ht(I> = •*: GOTO 330 

500 IF HIDt (St(E). LEN ISt(E)) - 1.1) 

Bt:B = VAL (Bt) 

370 IF ASC IB») = 8 THEN H»(I) = LEFT 

= V THEN St(E) = St(E) ♦ 'O 1 : GOTO 51 

710 IF B < 1 OR B > 8 THEN 705 

» (H»(I), LEN (M»(I)) - 1): GOTO 330 

0 

715 IF PEEK (6) = PEEK (7) AND (A < 1 

375 IF ASC (B») = 32 THEN H»(I) = M»(I 

502 IF LEN (St(E)) < 3 THEN 505 

AND A > 8) THEN 705 

) + "00": 60T0 330 

504 IF HIDt (St(E), LEN <S»(E)> - 2.1) 

720 IF B = PEEK (6) AND B > 0 AND B < 

380 Ht(I) = H»(I) + Bt: IF LEN (H»(I)) 

= V THEN 510 

7 THEN 775 

< 8 THEN 330 

505 S» (E) = S» (E) + '.OO* 

725 POKE 6.8 

382 IF LEN (Htdl) < 2 THEN 390 

510 PRINT D*: 1 NRITE 1 :NFt(B): 1 ,R 1 ;E 

729 : 

385 IF HIDt (Ht(I). LEN (Ht(I)) - 1.1) 

515 PRINT R» (E ): PRINT D» (E) : PRINT Htl 

730 REH === A REHPLIR ”= 

= V THEN H*' = Ht(I) ♦ "O’: GOTO 39 

E): PRINT 0»(E): PRINT S»(E) 

731 : 

5 

520 NEXT E: PRINT Dt:‘CLOSE’:NF»(B): F = 

735 NFt(l) = 1 C.B.84.B5 1 :N»(1) = 'COHPTE 

387 IF LEN iHt(U) < 3 THEN 390 

IïT = 0: 60T0 55 

BANCAIRE 1 

388 IF HIDt (Ht(I), LFN (H»(I)> - 2.1) 

524 : 

740 NFt(2) = 11 :Nt(2) = 11 

= V THEN 395 

525 REH === 

745 NF»(3) = 11 : N»(3) = B1 

390 H»(I) = Ht(I) + \00‘ 

526 : 

750 NFt(4) = 1 ": N»(4) = 11 

395 VTAB (22): HTAB (30): CALL - 868: 

530 INVERSE : PRINT * D*. "DATE*.’HONTAN 

755 NF*(5) = “N* (5) = 

HTAB (40 - LEN (H»(I>)): PRINT Nt(I) 

T‘. 'OBJET'. "SOLDE-: TAB ( 75)-NV ": 

760 NFt<6) = 1 “:Nt(6) = 11 

400 VTAB (22): HTAB (47): PRINT 1 . 

C = 0: NORHAL : RETURN 

761 : 

...":: HTAB (46): INPUT “ *:0»(I) 

599 : 

765 IF B = 7 THEN 790 

405 IF Otll) = " OR LEN (Ot(I)) > 9 T 

600 REH === HENU 

770 IF B M THEN HOHE : END 

HEN 400 

601 : 

775 VTAB (22): HTAB (40): GET At: PRINT 

410 IF Rt(I) = "R" THEN S = VAL (S»(I 

605 DIH R»( 400),D»(400),H» ( 400).0» ( 400) 

At : A ? VAL (At) 

- D) - VAL (Ht(I)):S(I) = FN F(S):St( 

.St ( 400),S(400) 

780 IF A* = 'E* THEN 705 

I) = STRt (S(I) ) 

610 TEXT : HOHE : PRINT : VTAB (1): HTA 

785 IF A* = -' OR A < 1 OR A > 5 THEN 7 

415 IF R»(I) = "V THEN S = VAL (S»(I 

B (38): PRINT * HENU *: FOR I = 0 TO 79: 

75 

- D) + VAL (H»(I)):S(I) = FN F (S) s St ( 

PRINT NEXT 

790 1F ASC (Bt) = 13 OR PEEK (7) = P 

I) = STRt (SID) 

614 : 

EEK (6) THEN 865 

420 IF LEN (St ( I) ) < 6 AND VAL (St(I) 

615 REH === A REHPLIR "= 

795 FOR 1 = 0 TO NI PEEK (7)) 

) - INT ( VAL (St ( I) )) = 0 THEN St!I) = 

616 : 

800 Rt(I) = "îDtd) = “îHtd) = 11 : 0* ( 

S»(I) + '.OO' 

620 VTAB (4): PRINT * 1 : LE COHPTE BAN 

I) = "iStd) = NEXT I 

425 IF HIDt (St(I). LEN (St(D) - 1.1) 

CAIRE 1 

805 POKE 7. PEEK (6) 

= ■.■ THEN St(I) = St(I) + '0* 

625 VTAB (6): PRINT 1 2 :‘ 

809 : 

430 VTAB (22): HTAB (64): PRINT St(I) 

630 VTAB (8) : PRINT 1 3 :" 

810 REH === LECTURE DONNEES === 

435 VTAB (23): PRINT " Voulez-vous chan 

635 VTAB (10): PRINT * 4 : * 

811 : 

ger quelque chose ? (O/N) GET Bt: PR 

640 VTAB (12): PRINT 1 5 :* 

015 D* = CHRt (4) 

INT Bt 

645 VTAB (14): PRINT 1 6 :’ 

820 DEF FN F(X) = INT ( ABS (X) » 10 

440 IP Bt < > ‘O* AND B» < > "N 1 THEN 

646 : 

A 2 + .5) / 10 A 2 » SGN (X) 

435 

650 VTAB (16): PRINT 1 7 : L’ETAT DES C 

825 IF B = 7 THEN 1700 

445 IF Bt = "0* THEN 215 

OHPTES- 

830 HOHE : VTAB (12): HTAB (30): PRINT 
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■ SAISIE DES DONNEES 1 

835 PRINT D«;"OPEN*;NF*(B): H ,L40“ 

840 PRINT Dt:"REAB':NFt(B); *,R0": INPUT 
N (B) 

845 FOR 1=1 TO N(B) 

850 PRINT D*;"READ , !NF$(8); , ,R , :I 
855 INPUT Rt(I): INPUT D*(I): INPUT H$( 
I): INPUT Ot(I): INPUT S$(I) 

860 NEXT : PRINT Dt; "CLOSE" ; NF* (B) 

865 ON A GOTO 900,1000,1100,1200,1600 

899 î 

900 REM ==: ETAT DU COMPTE === 

901 : 

905 T = 0:F = N(B): 6OT0 30 
910 VT AB (21): HTAË (2): INVERSE : PRIN 
T ' UTILISER les (lèches pour “ : “faire * 
onter ou descendre le listing du co»pte, 

912 VTAE (23): HTAB (2): INVERSE : PRIN 
T " une touche pour stopper le";* listin 
g ou RETURN pour retourner au menu NO 
RMAL :T = 1 

915 POKE 34,6: POKE 35,19: PRINT 
920 L = PEEK ( - 16384): POKE - 16368, 

0 

925 IF L = 10 AND F = 13 AND Z = 13 THE 
N 920 

930 IF L = 10 AND F = 1 THEN 920 

935 IF L = 10 AND Z = 1 THEN PRINT CH 

Rt (22): F = F - 1:1 = F: SOTO 85 
940 IF L = 10 AND Z = 13 THEN PRINT C 
HR* (22):Z = 1:F = F - 11:1 = F: 60T0 85 

945 IF L = 11 AND Z = 1 THEN Z = 13:F = 

F + 12:1 = F: 6DT0 85 
950 IF L = 11 AND Z = 13 THEN F = F ♦ 1 
:I = F: G" Tn 3 
955 IF L 1 13 THEN 610 
960 IF F 13 OR L < > 13 OR L < >10 
OR L < >11 THEN 920 

999 : 

1000 REM "= MODIFICATION DU COMPTE = 

1001 : 

1005 T = 0:F = N(B): SOTO 30 
1010 VTAB (18): CALL - 958:C* = "* 

1015 VTAB (18): HTAB (2): INVERSE : PR1 
NT " UTILISER les (lèches pour';* (aire 

«onter ou descendre le listing du co«pte 

■ 

1017 VTAB (20): HTAB (2): INVERSE : PRI 
NT “ une touche pour stopper 1“:"e listi 
ng ou RETURN pour retourner au «enu “ 
1020 VTAB (22): HTAB (2): INVERSE : PRI 
NT ' POUR MODIFIER une opérati‘on tape 
r ’S’, son n*: colonne ’R’ puis RETURN 1 
: NORMAL :T = 1 

1022 POKE 34,6: POKE 35,16: PRINT 

1023 L = PEEK ( - 16384): POKE - 16368 
,0 

1025 IF L = 10 AND F = 10 AND Z = 10 TH 
EN 1023 

1030 IF L = 10 AND F = 1 THEN 1023 



1035 IF L = 10 AND Z = 1 THEN PRINT C 
HR» (22):F = F - 1:1 = F: 60T0 85 

1036 IF L = 10 AND Z = 10 THEN PRINT 

CHR* (22):Z = 1 : F = F - 8:1 = F : SOTO 85 

1037 IF L 1 11 AND Z 1 1 THEN Z = 10:F 

= F + 9:I = F: 60T0 85 

1038 IF L = 11 AND Z = 10 THEN F = F + 
1:1 » F: 60T0 85 

1040 IF L = 13 THEN 610 

1045 IF L = 83 THEN TEXT : SOTO 1050 

1047 60T0 1023 

1050 P» = ' OPERATION A MODIFIER N* *: V 
TAB (22): HTAB (1): SET B»:Q = ASC (B*l 

1055 1F 0 > 47 AND 0 < 58 AND LEN (C*) 

< 3 THEN C* = C» + CHR» (0) 

1060 1F 0 > 47 AND 0 < 58 AND LEN (C») 

= 3 THEN C» = M1D* (C»,2,2) + RI6HT* 

( CHR» (0),1) 

1062 IF 0 = 13 AND C» = “ THEN 1050 

1063 IF 0 = 13 THEN 1070 

1064 IF 0 - 69 THEN 1023 

1065 VTAB (23): HTAB (2): INVERSE : PRI 
NT P»;C»;‘ *: NORMAL : 60T0 1050 

1070 TEXT : VTAB (18): CALL - 958: HTA 
B (2): INVERSE : PRINT P»; VAL (C»);* ’: 
NORMAL : 60T0 200 

1099 : 

1100 REM CREATION-MISE A JOUR DU 
COMPTE =" 

1101 : 

1105 T = 0:F = N(B): 60T0 30 

1110 POKE 34,6: POKE 35,16: PRINT : TEX 

T 

1115 T = 1: Z = 10: 60TD 85 

1199 : 

1200 REH RECHERCHE D’UNE OPERATION 

ssz 

1201 : 

1205 HOME : PRINT : INVERSE : HTAB (27) 

: PRINT ■ RECHERCHE D’UNE OPERVATION 1 
: NORMAL 

1210 POKE 34,2: HOME 
1215 PRINT : PRINT ■ La recherche de 1 
'opération demandée se (ait A p'î'artir 
de plusieurs critères : son nuaéro, sa 
date, son eontant, ‘i'son objet,' 

1220 PRINT : PRINT * Lorsque le nuiéro 
de l’opération n’est pas connu*;" f l’or 
dinateur vous transiet : une liste d’opé 
rations se rapproch";"ant le plus de l’o 
pèration deiandée' 

1225 PRINT : PRINT * Lorsque vous ne co 
nnaissez pas une donnée tapez ’O” 

1230 PRINT : INVERSE : HTAB (23): PRINT 
' A VOUS DE RENSEIGNER L’ORDI":'NATEUR 
': NORMAL 

1235 VTAB (22): HTAB (2): INVERSE : PRI 
NT " PRESSEZ une touche pour c'j’ontinue 
r NORMAL : SET B»: HOME 
1240 VTAB (4): PRINT ' Nueéro de l’opér 
ation à rechercher : VTAB (4): HTA 

B (38): INPUT ' ':I 


1245 IF I = 0 THEN 1270 
1250 IF I < 1 OR I > N(B) THEN PRINT : 
PRINT " Le nu«éro de l’opération “;"est 
incorrect ou trop grand": GOTO 130 
1255 PRINT : PRINT " Voici l’opération 
deoandée :*: PRINT 
1260 60SUB 530 

1265 PRINT " "; R*(I),D*(I),M*(I),O*(I), 

St(I): TAB( 75)1: SOTO 130 

1270 VTAB (4): PRINT " Date de l’opérat 

ion à rechercher : VTAB (4): 

HTAB (37): 6ET B»: GOTO 12B5 

1275 H = 37 + LEN (Dl») 

1280 VTAB (4): HTAB (37): PRINT Dl*:: H 
TAB (H): GET B* 

1285 IF ASC (B*) = 13 OR ASC (B*) = 8 

OR ASC (B*) = 21 OR ASC (B*) > 47 AND 

ASC (B*) < 58 THEN 1295 
1290 GOTO 1275 

1295 1F Dl* = *0" AND ASC (B*) = 13 TH 
EN PRINT ’ ": GOTO 1365 
1297 IF ASC (B») = 13 THEN 1275 

1300 IF LEN (Dl*) = 0 AND ASC (Bt) = 

8 THEN 1275 

1305 IF ASC (Bt) = 8 AND LEN (Dit) = 

1 THEN Dl* = ": GOTO 1275 
1310 1F ASC (Bt) : 8 THEN Dit = LEFTt 
(Dit, LEN (Dl*) - 1): GOTO 1275 
1315 IF LEN (Dit) = 7 THEN 1130 

1320 1F LEN (Dl*) = 0 OR LEN (Dit) = 

3 OR LEN (Dit) = 6 THEN Dit = Dit + Bt: 
GOTO 1275 

1325 IF LEN (Dit) = 1 OR LEN (Dit) = 

4 THEN Dl* = Dl* + B* + '/*: GOTO 1275 
1330 Dl* = Dl* + B* 

1335 VTAB (4): HTAB (37): PRIN) Dit 
1340 PRINT : PRINT ■ Voici la liste des 
opérations (ai tes le * :D1 * : PR1NÏ 
1345 GOSUB 530 

1350 FOR 1=1 TO N(B): IF Dt(I) = Dit 
THEN PRINT • * : R*(I),D*(I),M*(I),0*(I), 
St(I); TAB( 75)1 :C = 1 
1355 NEXT I: IF C = 0 THEN PRINT : PRI 
NT " Aucune opération n’a été e':“((ectu 
ées le “;Dl* 

1360 60T0 130 

1365 VTAB (4): PRINT " Montant de l’opé 

ration à rechercher (en (rs! : . 

VTAB (4): HTAB (49): GET Bt: GOTO 1 
3B0 

1370 H = 4? + LEN (Mt) 

1375 VTAB (4): HTAB (49): PRINT M*:: HT 
AB (H): 6ET Bt 

1380 1F ASC (Bt) = 13 OR ASC (Bt) = 8 

OR ASC (Bt) = 21 OR ASC (Bt) = 32 OR 

ASC (Bt) = 46 OR ASC (Bt) > 47 AND AS 
C (Bt) < 58 THEN 1390 
1385 GOTO 1370 

1390 IF Mt = "0' THEN PRINT " ": GOTO 
1465 

1395 IF ASC (Bt) = 13 THEN 1430 

1400 IF ASC (Bt) * 21 THEN 1370 











1405 1F ASC (B*) = 8 AND LEN IN») = 0 
THEN 1370 

1410 IF ASC (B*) = 8 AND LEN (MS) = 1 
THEN MS = 60T0 1370 

1415 IF ASC (B») = 8 THEN Mi = LEFTS 
(N$, LEN (M$) - 1): GOTO 1370 
1420 IF ASC (BS) = 32 THEN Ht = Mi + * 
00*: GOTO 1370 

1425 Mi = Ni + Bi: IF LEN (Ni) < 8 THEN 
1370 

1430 VTAB (4): HTAB (49): PRINT Ni 
1435 IF LEN (Ni) < 4 THEN PRINT : PRI 
NT “ N’oubliez pas d’indiquer r;"es cen 
times “: GOTO 1365 

1440 PRINT : PRINT “ Voici la liste des 
opérations dont le montant de ";Mt;" Tr 
s": PRINT 
1445 GOSUB 530 

1450 FOR 1=1 TO N(B): IF Nt(I) = Mi T 
HEN PRINT * * ;Rt(I),Dt(I),Mi(I),Oi(I),S 
i(I); TAB( 75)I :C = 1 
1455 NEXT I: IF C = 0 THEN PRINT : PRI 
NT " Il n’existe aucune opérati"on d’u 
n montant de "; Mi;" frs" 

1460 GOTO 130 

1465 VTAB (4): CALL - 868: PRINT * Obj 
et de l’opération à rechercher";" : .... 
. “: VTAB (4): HTAB (37): INPUT " 

Oi 

1470 IF Oi = "0" THEN PRINT : PRINT " 
L’ordinateur ne peut rien pour Vvous 1 
": 60T0 130 

1475 IF Oi = *“ OR LEN (Oi) > 9 THEN 1 


465 

1480 PRINT : PRINT " Voici la liste des 
opérations qui ont pour objet : " ; OS: P 
RINT 

1485 GOSUB 530 

1490 FOR I = 1 TO N(B) : IF OKI) = Oi T 
HEN PRINT Ri(I),DKI).Ni(I),Oi(I),St(I) 
; TAB( 75)I:C = 1 

1495 NEXT I: IF C = 0 THEN PRINT : PRI 
NT " Il n’existe aucune opérat";“ion qui 
ait pour objet : ";0* 

1500 GOTO 130 

1599 : 

1600 REM === LISTING SUR IMPRIMANTE 

1601 : 

1605 PRINT CHRt (4):"PR£1": PRINT "" 

1610 REM === A REMPLIR EN FONCTION DE 
L’IMPRIMANTE UTILISEE === 

1611 : 

1615 FOR I = 1 TO N(B) 

1620 REM === SORTIE DES OPERATIONS DU 
COMPTE === 

1621 : 

1625 NEXT I 

1630 PRINT CHRt (4);"PR£3": PRINT 
1635 VTAB (10): HTAB 2: INVERSE : PRINT 
" PRESSEZ une touche pour ret*;‘ourner 
au menu NORMAL : GET Bi: GOTO 610 
169° : 

1700 REM === ETAT DES COMPTES === 

1701 : 

1705 HOME : VTAB 12: HTAB 30: PRINT " S 


AISIE DES DONNEES " 

1710 FOR B - 1 TO 5 

1715 1F NFi(B) = "" THEN 1745 

1720 PRINT Di;"0PEN";NFKB);",L40" 

1725 PRINT Di;"READ , îNFi!B);*,RO‘: INPU 
T N (B) 

1730 PRINT Di;“READ";NFi<B);",R‘;N(B) 
1735 INPUT Ri: INPUT Di (B) : INF'UT Mi: I 
NF'UT Oi: INPUT Si (B) 

1740 PRINT Di;-CLOSE■;NFi(B) 

1745 NEXT B 

1750 S = VAL (SKI)) + VAL (St(2) ) + 
VAL (St(3)) + VAL (St(4)) + VAL (Si(5) 
) 

1755 S = FN F(S): Si = STRi (S) 

1760 IF LEN (St) < 6 AND VAL (St) - 
INT ( VAL (St)) = 0 THEN St = Si + ".OÙ" 

1765 IF MIDi (Si, LEN (St) - 1,1) = B . 
■ THEN Si = St + “0" 

1770 Et - ” Dernier solde au ‘ 

1775 HOME : VTAB 6: FOR B = 1 TO 5 
1780 PRINT Ni (B); TAB( 45 - LEN (Et !)E 
i; Di (B) ; " : "; T AB ( 70 - LEN (St(BD)Si 
(B); TAB( 71)“Frs" 

1785 PRINT : NEXT : PRINT TAB( 58)"— 


1790 PRINT T AB( 39)"ETAT DES COMPTES"; 
TAB( 70 - LEN (Si))St; TA6I 71)"Frs" 

1795 VTAB 22: HTAB 2: INVERSE : PRINT " 
PRESSEZ une touche pour retou":"rner au 
menu ";: NORMAL : GET Bt: GOTO 610 



Philippe Lumeau 

Ce professeur d’éducation manuelle 
et technique de vingt-neuf ans pro¬ 
gramme depuis trois ans. Il a abordé 
la micro-informatique avec un ZX 81. 
Il est marié, il a un enfant de 20 mois 
qui ne pianote pas encore sur le cla¬ 
vier et il joue au tennis. 

M essieurs les professeurs, ré¬ 
jouissez- vous. Si votre école 
possède un TO 7, vous allez 
pouvoir expliquer à vos élèves le 
fonctionnement d’un calibre à coulisse. 
Vous aurez même la possibilité de faire 


fonctionner ce programme sur nano¬ 
réseau. Messieurs les élèves, vous 
allez pouvoir étonner l'un des profes¬ 
seurs réjouis et nommés ci- dessus en 
apprenant chez vous. Messieurs tous 
les autres, savez-vous ce qu'est un 
calibre à coulisse ? ■ 


Philippe LUMEAU 


3 CLS 

10 SCREEN 2.0,0:ATTRB0,1 :L0CATE0,3.0:FRI 
NT"LE CALIBRE A COULISSE" 

15 BOX(0.49)-(168,52),3:C0L0R5 
20 ATTRB1,0:L0CATE4,10:PRINT"t C0NSTITUT 

ION I" 

25 L0CATE6,13:PRINT”* LECTURE «" 

30 L0CATE8,16:PR INT"* EXERCICES »" 

40 ATTRB0,0 
50 CLEAR.,3 

55 DEF6Ri(0)=255,1, 1, 1,9, 1, 1,255 
60 DEF6Rt(11=31,240,0,0,0,0,240,31 
65 DEF6RK2! =254, 1,126,32,96,32.96.192 
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70 HAIN$=6R*(0)+6R»I1!+6R$(2) 

72 G0SUB11100 
75 NL=1 

80 L0CATE0,0,0 
85 

100 SCREENO,0,0:CLS 

MO 60SUI il000:RESTORE 20000:60SUB 1000 
0:60SUB12000:60SUB11100 
120 60SUB 11000:RESTORE 20060:60SUB 1000 
0:B0SUB11100 

130 SOSUB 11000:RESTORE 20140:80SUB 1000 
0:60SUB11100 

140 SOSUB 11000:RESTORE 20200:SOSUB 1000 
0:G0SUB11100 

150 GOSUB11000:SOSUB11100 
160 CLS:SOSUB 11000:RESTORE 20250:60SUB1 
0000 

170 X1=1 :X2=5:X3=9 
180 SOSUB 12100 

190 SOSUB 10000:SOSUB 12200:60SUB 11100 
200 GOSUB 11000:SOSUB 11100:L0CATE35.24: 
PRINT SPC(4)j 

210 FOR N«1 TD 7sLINE(103,57)-(103.71),1 

:PLAY“SO’:LINE(103,57)-(103,71),6:PLAY"P 

• 

215 LINE(51|53)-(51,40),IiPLAY'SO'iLJNEI 
51,53)-(51,40).AiPLAY'P’tNEXTN 
220 LINE(51,53)-<51,40),1 :L0CATE14,22sPR 
INT"Ici 9c«":GOSUB 11100:L0CATE35,24:PRI 
NT SPC(4); 

230 FOR N=1 TO 7:LINE(103,57)-( 103,71 ).1 

:PLAY"S0":LINE(103,57)-(103,71),6:PLAY"P 

■ 

235 LINE(101,53)-(101,44),1:PLAY'SO*: LIN 

E(101,53)-<101,44),6:PLAY"P*:NEXTN 

240 LINE (101,53)-MOI,44), 1 :L0CATE22,22 

: PRINT "et SmMGOSUBIIIOO 

250 G0SUB11000:S0SUB11100 

260 G0SUB11000:60SUB11100:L0CATE35,^4:PR 

INT SPC < 4)j: FOR NM TO 7:LINE(121,57)-(1 

21,63),1:LINE(121.53)-(121.48).1:PLAY*S0 

P" 

265 LINE(121,57)-(121,63),6:LINE(121,53) 
-(121,48).6:PLAY"SOP *:NEXTN:LINE(121,57) 
-(121,63), 1 

270 G0SUB11000:G0SUB11100 
280 GOSUB 11000 

290 K4MNKEY4: IF K$=" THEN SOTO 290 

300 IF Ki^O' THEN CLS:RUN 50 

310 IF K$<>*N , THEN 60T0290 

♦00 CLS:NL=1:SC=0:GOSUB 13000:60SUB11100 

410 CONSOLE 18,24 :CLS: COL OP’ 

420 RESTORE 20370:GOSUB 10000 
430 LOCATE 1.19:PRINT"ReDonse (en •»):" 
440 LOCATE 1.21:PRINT"ReDonse exacte :" 
450 LOCATE 1.23:PR INT"Points : 0’ 

460 LOCATE 18.23:PRINT"EXERC1CE No : 0* 
510 FOR NOM TO 10:C0L0R 3:L0CATE 32,23: 
PRINTUSINS XtjNO 

520 CONSOLE 0.17:CLS:CONSOLEO.24 
530 RESTORE 20250:GOSUB 10000 
540 X1=I NT(RNDt10): ZY1=X1 


550 X2=INT(RNDtlO)+l:ZY2=X2 
560 X3=INT(RNDt10)+2:ZY3=X3 
570 60SUB 12100:G0SUB10000:60SUB12200 
580 NBRE=ZY3tl0-ZY2-0.ltZYl+10.3:NBRE=C1 
NT(NBREI10)/10:LO=18:REP$="* 

590 LOCATE LO.19,0:PR INT"-CHR«(8);:RE* 
=1NPUTi(1):PRINTRE* 

595 IFRE*=CHR$(13) THEN 615 

596 IF RE»=CHR$(29) THEN LOCATE 18,19:F'R 

INT- * : L0=18:REP*=“* :60T0590 

600 1F ASC(RE$)<46 OR ASC(RE$)>57 OR ASC 
(REI)=47 THEN PRINTCHR*(8): * *:6QT0590 
605 REP$=REP*+RE$:L0-L0+1 
610 60T0590 
615 REP=VAL(REP») 

620 LOCATE 17.21.0:PRINT NBRE 
630 IF REP=NBRE THEN SC=SCM 
635 LOCATE 10.23: PRINTSC:60SUB 11100 
640 LOCATE 16,19.0:PRINT" 

650 LOCATE 16,21,0:PRINT" 

660 LOCATE 36,24,0:PRINT" 

700 NEXT NO :COLOR3 

710 IF SC<4 THEN LOCATEO.12:PRINT"Je vou 
s propose de revoir la leçon.":60SUB1110 
0:CLS:RUN 50 

720 IF SC<7 THEN LOCATEO,12:PRINT"Vous a 
Uez reconeencer une sérié de dix lectur 
es.“:GOSUB 11100:6DTO 400 
730 LOCATEO,12:PRINT*Vous pouvez -A- Arr 
eter -R- Recoeeencer" 

740 KIMNKEYl: IF K$=" THEN 740 
750 IF KI=‘R‘ THEN 60T0400 
760 IF KJO'A' THEN 60T0740 
8°0 SCREEN6,0,0:CLS 
900 END 

9998 REM 4 PROCEDURE DESSIN I 

10000 READ NB 

10010 FOR NM TO NB 

10020 READ C,F,X1,Y1.X2,Y2 

10030 ON F SOSUB 10050.10060,10070 

10040 NEXT N:RETURN 

10050 BOX (XI,Y1)-(X2,Y2),C:RETURN 

10060 BOXF(XI.Y1)-(X2,Y2),C:RETURN 

10070 LINE(X1,Y1)-(X2,Y2),C:RETURN 

10998 REM I PROCEDURE TEXTE » 

11000 C0NS0LE20,24:C0L0R3,0:CLS:RESTORE 

30000 

11010 FOR NM TO NL:READ TE1$,TE2$,TE3$: 
NEXTN 

11015 LT=LEN(TE1*): IF LT)40 THEN LT=41 
11020 LOCATE (41-LT)/2.20:PRINT TEU 
11025 LT=LEN(TE2«): IF LT>40 THEN LT=41 
11030 LOCATE <41-LT)/2.21 : PR INT TE2* 
11035 LT=LEN<TE3i): IF LT>40 THEN LET LT= 
41 

11040 LOCATE (41-LT)/2.22:PRINT TE3$ 
11050 CONSOLEO,24:NL=NL+1:RETURN 
11098 REH I PROCEDURE ATTENTE I 
11100 IF MU=0 THEN PLAY"Û4D0MIS005D0":MU 
=1 :G0T011110 

11105 1F HUM THEN PLAY"05D004SOHIDO":HU 
=0 


11110 C0L0R7:L0CATE36,24:PRINT HAIN4: 
11120 K*MNKEY*:IF «*=“■ THEN T=RND:G0T0 
11120 

11130 RETURN 

11998 REH I TRAITS REGLE » 

12000 FOR N=23 TO 283 STEP 10 

12010 LINE (N, 18) - (N, 13), 6 

12020 NEXT N:RETURN 

12098 REH 4 HARQUAGE REGLE 4 

12100 C0L0R3:FOR NMO TO 300 STEP 10 
12110 XX=X1+N 

12120 X2=X2-1:IF X2=0 THEN LINE(XX,54)-( 
XX,40),LOCATE XX/8-1,4 : PR INT X3:X3=X3+ 
1 :X2=10 

12125 IF X2=5 THEN LINE(XX,54)-(XX,44) ,6 
12130 LINE (XX,54)-(XX,48),6 
12140 NEXT N 
12150 RETURN 

12198 REH 4 TRAITS VERNIER 4 

12200 FOR N=0 TO 10:NM03+94N 
12210 LINE (N,57)-(N,63) 

12220 IF N=0 THEN LINE (N,57)-(N,74).2:L 
OCATE12,9:PRINT"0* 

12230 IF NMO THEN LINE (N,57)-(N,74).2: 
L0CATE24,9:PRINT"10" 

12240 IF N*5 THEN LINE (N,57)-(N,68I.2 
12250 NEXTN:RETURN 

12998 REH » PROCEDURE 2HE TEXTE 4 
13000 CONSOLE 20,24: COLOR3:CLS:REST0RE31 
000 

13010 FOR NM TD NL:READ TE1*,TE2»,TE3>: 
NEXTN 

13015 LT*LEN(TE1$): IF LT>40 THEN LET LT= 

41 

13020 LOCATE (41-LT)/2,20:PRINT TE1$ 
13025 LT=LEN(TE2$): IF LT>40 THEN LET LT= 

41 

13030 LOCATE (41-LT)/2,21:PRINT TE2$ 
13035 LT=LEN(TE3»): IF LT>40 THEN LET LT= 

41 

13040 LOCATE (41-LT)/2,22:PRINT TE3$ 
13050 CONSOLEO.24:NL=NL+1 :RETURN 
20000 REH REGLE 6 BEC FIXE 

20005 DATA 5 

20010 DATA 6,1,8,8,300,23 
20015 DATA 6,3,8,24,18,63 
20020 DATA 6,3,18,63,23,63 
20025 DATA 6,3,23,63,23,23 
20030 DATA 6,3,23,18,292,18 

20059 REH CURSEUR 6 BEC HOBILE 

20060 DATA 6 

20070 DATA -1,2,40,8,95,23 
20080 DATA 2,1.40,7.95,28 
20090 DATA -1,3,41,28,52,28 
20100 DATA 2,3,40.2B,40,63 
20110 DATA 2,3,40,63,45,63 
20120 DATA 2,3,45,63,53,28 
20130 REH VERNIER 

20140 DATA 5 

20150 DATA 2,1,55,12,88,20 
20160 DATA 6,3,56,18,87,18 
20165 DATA 6,3,63,18,63,13 
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20170 

DATA 

6.3, 

,73,18,73,13 

20180 

DATA 

6,3 

,83,18,83,13 

20190 

REM 


OBJET 

20200 

DATA 

3 


20210 

DATA 

1,1, 

,24,50,39,65 

20220 

DATA 

1,1 

,10,65,60,85 

20230 

DATA 

-i,; 

3,25,65,38,65 

20240 

REM 


GRAND VERNIER 

20250 

DATA 

5 


20260 

DATA 

6,3 

,10,23,79,23 

20270 

DATA 

6,3, 

,10,64,79,64 

20280 

DATA 

6,3 

,240,23,309,23 

20290 

DATA 

6,3, 

,240,64,309,64 

20300 

DATA 

6,3 

,10,54.309,54 

20310 

DATA 

4 


20320 

DATA 

2,1 

,80,20,239,80 

20330 

DATA 

2.1 

.87,31,232,56 

20340 

DATA 

-1, 

2,81,54,86,30 

20350 

DATA 

-1, 

2,233,54,238,30 


AMSTRAD 

jSRnns 

Langage : Basic 


20360 REM PRESENT. EXERCICE 
20370 DATA 3 

20380 DATA 5,1,0,148.280.196 

20390 DATA 5,1,0,162,280,180 

20400 DATA 5,3,132,180,132,196 

30000 DATA Un calibre a coulisse se coup 

ose,d’une réglé graduée et d’un bec -fixe 

J 

30010 DATA d’un curseur »uni d’un bec no 
bile,, 

30020 DATA Ce curseur possédé une fenetr 
e,de lecture appelée VERNIER , 

30030 DATA La mesure lue sur le vernier 
représente,la distance entre les deux be 
es, 

30040 DATA Examinons de plus près la par 
tie,que nous avons appelé vernier, 

30050 DATA Le calibre a coulisse permet 
la 1écture,des centimètres des millimetr 


es et des,dixièmes de millimétrés... 

30060 DATA Ci et mm se lisent immédiate! 
ent a,gauche du trait "O" du curseur, 
30070 DATA Nous obtenons donc 95 mm.,Voy 
ons maintenant la lecture des,dixièmes d 
e millimétrés. 

30080 DATA II faut rechercher la corresp 
ondance,exacte entre une graduation de 1 
a réglé,et une graduation du vernier. 
30090 DATA La lecture des dixièmes se fa 
it,sur le vernier ; ici 2 dixièmes,nous- 
obtenons donc 95.2 mm 
30190 DATA .Voulez-vous revoir cette par 
tie ?(0/N), 

31000 DATA Je vous propose une sene de 
dix,exercices sur ce modèle ; donnez vos 
,réponses exprimées en millimétrés. 

40000 DATA zut,zut,zut 


ANDRE GOUDONNET 
GAGNE 

UNE IMPRIMANTE 
EPSON LX80 


André Goudonnet 

Trente-trois ans et trois enfants de 
neuf, six et trois ans. Passionné 
d’électronique, il travaille dans une 
usine d’enrichissement d'uranium et 
pratique la micro depuis deux ans. 
Aimerait consacrer plus de temps à 
la micro. Il ne s’intéresse pas vrai¬ 
ment à l’astrologie mais a conçu ce 
programme à la demande insistante 
de nombreux de ses proches. 


S tatistiquement, 98 des Français 
savent sous quel signe ils sont 
nés. Vous avez donc toutes les 
chances d’en faire partie. Mais con¬ 
naissez-vous votre ascendant? Et 
qu’en est-il des trigones, oppositions, 
maisons et autres positions ésotéri¬ 
ques du ciel au jour de votre nais¬ 
sance? Vous avez maintenant la pos¬ 
sibilité de tout savoir grâce à Micro 
V.O. Le fonctionnement du programme 
est très simple : il suffit de suivre les 
instructions. ■ 


André GOUDONNET 


120 BORDER 11 :pre=0:SYMBOL AFTER 230:DIIt pli 
nete»(12),signe»(12),longitude(12),mai son(13 
),lor(15),lp(15),a(15),TABLE»(12),mois»(12), 
secteur(12) 

130 SYMBOL 230,129,66,36,36,36,24,24,24 
140 SYMBOL 231,129,129,129,66,60,36,36,60 
150 SYMBOL 232,255,36,36,36,36,36,36,255 
160 SYMBOL 233,255,144,144,240,15,9,9,255 
170 SYMBOL 234,48,40,36,36,238,167,229,7 
180 SYMBOL 235,252,84,84,84,84,85,82,85 
190 SYMBOL 236,60,36,36,231,0,255,0,0 
200 SYMBOL 237,252,84,84,84,84,85,86,84 
.210 SYMBOL 238,0,4,66,255,66,4,0,0 
220 SYMBOL 239,254,4,8.16,46,74,126,8 
230 SYMBOL 240,0,0,170,85,(Y, 170,85,0 
240 SYMBOL 241,195,36,24,126,126,24,36,195 
250 SYMBOL 242,126,255,195,219,219,195,255,1 
26 

260 SYMBOL 243,240,56,28,28,28,28,56,240 
270 SYMBOL 244,189,102,102,102,60,24,126,24 

280 SYMBOL 245,60,102,102,102,60,24,126,24 

290 SYMBOL 246,15,7,13,120,204,204,204,120 
300 SYMBOL 247,248,24,48,96,204,216,254,24 
310 SYMBOL 248,240,96,126,127,99,99,102,12 
320 SYMBOL 249,24,255,90,90,90,90,255,24 
330 SYMBOL 250,90,126,24,60,102,102,102,60 
340 SYMBOL 251,189,165,165,126,60,24,24,24 

350 SYMBOL 252,0,0,0,255,255,0,0,0 
360 SYMBOL 253,0,0,0,255,255,0,0,0 


370 MODE 1 :CLS:INK 0.1:INK 1,24:INK 2,20:INK 
3,6:PAPER OîPEK 1 : LONGITUDE(1)=INT(RNDI360) 
♦1:F0R n=2 T0 9:longitude(n)=longitude(n-1)+ 
INT(RND*30)+5:NEXT n:1ongitude(11)=87.55:1 on 
g i tude(12)=331.23 

380 FOR yt=l T0 100:xX=(RND»40)+l:yX=(RND*23 
)+l:L0CATE xï,YX:PRINT*.’iNEXT yt:G0T0 2570 
:TAG0FF::HINDOMtO,23,40,9,17:PAPER 1:PEN 0:0 
LS:MINDOMtO,24,39,10,16:PAPER 0:PEN 2:CLS:L0 
GATE 4,2:PRINT*ASTR0L06IE" 

390 TA60FF::MINDOMtO,23,40.9,17:PAPER !:PEN 
0:CLS:NIND0NI0,24,39,10,16:PAPER 0:PEN 2:CLS 
:L0CATE 4,2:PRINT■ASTR0L06IE* 

400 L0CATE B,4:PRINT'PAR*:LDCATE 4,6:PRINT*A 
.GOUDONNET':RESTORE 1900:60SUB 4520:60SUB 44 
00:G0SUB 2170:pre=l:CLS:MODE 1 :RAD:DEF FN me 
os(x)=PI/2- (ATN(x/SQR(-x»x+l)) ) : IP=1 : RESTORE 
1940:60SUB 2070:CLS 

410 MODE 1:RAD:DEF FN acos(x)=PI/2-(ATN(x/SH 

R(-x *x+l))):IP=1: RESTORE 1940:60SUB 2070:CLS 

420 G0SUB 4220 

430 NIND0N40,1,80,1,25:CLS 

440 MODE 1 

450 CLS:LOCATE 11,10:PRINT STRING»(20,202):F 
OR N=1 T0 5:LOCATE 11,10+N:PRINT CHR*(202):L 
0CATE 30,10*N:PRINT CHR»(202):NEXT N:LOCATE 
11,16:PRINT STRINGi<20,202) 

460 FOR N=1 T0 5:LOCATE 12,10+N:PRINT STRING 
♦(18,143):NEXT NiLOCATE 13,13:PRINT CHR»(24) 
i'UN INSTANT S.V.P*;CHR»(24) 

470 j=j+hs 

480 n=a»365+31l(m-l)+j 
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490 IF m>2 60T0 510 

1000 tot=tot+l:oas=pas+l:60T0 780 

îLOCATE 64,2:PRINT"SEXTILE" 

500 a=a-l 

1010 oe=0.4091 :housel=ts+PI/2:F=1:GOSUB 1660 

1350 Z=1: FOR Y=4 TO 22 STEP 3:L0CATE 76.Y:PR 

510 n=n+lNT(a/4)-INT(a/100)+INT(a/400) 

1020 1ongitude(11)=house:«ai son(1)=house:«ai 

INT Z:Z=Z+1:NEXT y.GOSUB 2240:x2=17:y2=4:eca 

520 IF m<=2 GOTO 540 

son ! 13)=house:naison(7)=house+180:IF «aison( 

rt=9:angle=180:G0SUB 2220:x2=32:y2=4:ecart=8 

5Î0 n=n-INT((»-l)40.4+2.7) 

7)>360 THEN aaison(7)=«aison(7)-360 

:angle=120:GOSUB 2220:x2=47:y2=4:ecart=6:ang 

540 n=n-694325 

1030 housel=ts+2.09439:1=1.5:60SUB 1660:*ais 

1e=90:GOSUB 2220:x2=62:y2=4:ecart=4:ang1e=60 

550 i=INT((n/7-INT(n/7))17*0.005):60SUB 1510 

on(2)=house 

:GOSUB 2220:GOSUB 2170 

560 REH 

1040 housel=ts+2.61799:F=3:60SUB 1660:mai son 

1360 GOSUB 2360 

570 REH 

(3)=house 

1370 REH.CALCUL PLANET 

580 REH.CALCUL POSITION.230 

1050 •aison(8)=»aison(2)+180:IF aaison(8)>36 

E DOHINANTE. 

re« 

0 THEN aaisan(B)=aaison(8)-360 


590 REH soleil 

1060 aaisan(9)=aaison(31+180:IF aaison(9)>36 


600 ke=3ie=0.01675104:p=4.90847*8.185594E-07 

0 THEN aaison(9)=#aison(9)-360 

1380 IF caractère =1 THEN pld=5 

In:I1=4.868857+1.72027914E-02tn:m=l1-p:ms=m 

1070 60SUB 1750:»aison(10)=HC:IF aaison(10)> 

1390 IF caractère =2 THEN pld=4 

610 GOSUB 1560 

360 THEN «aison(10)=*aison(101-360 

1400 IF caractère =3 THEN pld=3 

620 v=2*ATN(TAN(u/2)*SQR((1+0.01675104)/<1-0 

1080 aaison(4)=iaison(10)+180:longitude(12)= 

1410 IF caractère =4 THEN pld=2 

.01675104))) 

aaison<10): IF aaison(4)>360 THEN aaison(4)=a 

1420 IF caractère =5 THEN pld=l 

630 r=1.000000231(1-0.01675104IC0S(u)): 1=v+p 

ai son(4)-360 

1430 IF caractère =6 THEN pld=3 

: ls=l 

1090 housel=ts+0.52359:GOSUB 1810:aaison<11) 

1440 IF caractère =7 THEN pld=4 

640 xs=r*C0S(l):ys=r*SIN<l) 

=house:housel=ts+l.04719:1=1.5:G0SUB 18IO:*a 

1450 IF caractère =8 THEN pld=10 

650 6QSUB 1610:longitudeTl)=ld 

ison(12)=house 

1460 IF caractère =9 THEN pld=6 

660 REH 

1100 aai son (5) =aaison (1D + 180: IF aai son (5) >3 

1470 IF caractère =10 THEN pld=7 

670 REH.LUNE. 

60 THEN aaison(5> s aaison(5)-360 

1480 IF caractère =11 THEN pld=8 

680 REH 

1110 aaison(6)=aaison(12)+180:IF aaison(6)> 

1490 IF caractère =12 THEN pld=9 

690 1=0.57999+0.229971503ln:o=4.1867-0.00092 

360 THEN aaison(6)=aaison(6)-360 

1500 RETURN 

422ln 

1120 GOSUB 2490 

1510 REH CALCUL DU TEMPS SIDERAL- 

700 1=0.3193+0.22B027135ln:d=l-ll:f=l-o 





710 1=1+0.l098ISIN(m)+0.003728ISIN(2lm)+0.01 


1520 rd=1.7273+1.72027914E-02»n+hs»2»PI-lolP 

149ISIN(2ld) 

1140 HODE 2:N1ND0N»0,1,80.1.25:PAPER 1:PEN 0 

1/180 

720 1=1-0.003329ISIN(»s)+0.02224ISIN(2ld-«)- 

:CLS:LOCATE 20,1:PRINT jourt(i); jour ;aois»(a 

1530 rd=(rd/2/PI-INT(rd/2/PI))*2*PI 

0.001945ISIN(2IT) 

ois) ; annee; ■ A* ; * *:heî ■h":»i ; *an*; * VT.U': 

1540 ts=rd:tsh=ts/(PII2/24):tsm=INT((tsh-INT 

730 1=1+0.001026ISlN(2ld-2li)+0.0009983tSIN( 

LOCATE 28.25:PRINT*(C)ONTINUER-(H)ENU*:ylp=3 

(tsh))*60) 

2td-i-is) 

:xlp=4:NIND0M40,2,79,2,24:PAPER 0:PEN 1:CLS 

1550 RETURN 

740 1=1+0.0009903 *SIN(2*d+«)+0.0008011 * SIN(2 

1150 IF rep=2 THEN GOTO 1300 

1560 REH.EQUATION DE KEPLER. 

ld-is) 

1160 FOR bouder' TO 12 


750 1=1+0.00071564SIN(•-■s)-0.00053234SIN(•♦ 

1170 longitude=iongitude(boucle) 

1570 u=i 

■s)-0.00060744SIN(d) 

1180 IF longitude<30 THEN sig=0:60T0 1210 

1580 FOR k=0 TO ke 

760 60SUB 1610:longitude(2)=1d 

1190 sig=INT(longitude(boude)/30):IF boude 

1590 u=m+e»SIN(u):NEXT k 

770 tot=l:pas=3 

= 1 AND longitudefboudei^iO THEN caractere=s 

1600 RETURN 

780 !F tôt>8 THEN GOTO 1010 

ig+1 

1610 ld=U180/PI 

790 ON tôt GOTO 800.810,820,830,840,850,860, 

1200 1 ongi tude=l ongi tude (boude)- (si g!30) :1F 

1620 1d=(ld/360-INT(ld/360)11360 

870 

boude=2 AND longitude(boude)>30 THEN cara 

1630 IF ld<0 THEN ld=ld+360 

800 j=0:ke=5:do=6.7:io=-0.21 :ao=3.8:bo=-3.4: 

ctere2=sig+l 

1640 ld=INT(ld»10+0.51/10 

co=2: 60T0 880 

1210 iinutes=longitude-INT(longitude):minute 

1650 RETURN 

810 j=l:ke=3:do=16.7:io=-4.l:ao=0.l:bo=2.4:c 

s=(minutes!60)/100 

1660 REH-calcul asc+maison 263 - 

o=-0.65:G0T0 880 

1220 IF boude=l AND longitude(boude)<30 TH 


820 j=2: ke=5:d0=9.4:»0=-l.36:aO=l.5:GOTD B80 

EN caractere=l 

1670 FOR boude=l TD 7 


1230 IF boude=2 AND longitude(boude)<30 TH 

1680 x=(S1N(housel)ITAN(oe)ITAN(la)) 

830 j=3:ke=4:Fg=t:do=196.9:»o=-9:ao=1.4B:60T 

EN caractere2=l 

1690 house=ts+PI-(FN acos(x)/F) 

0 880 

1240 1ongitude=INT <1ongitude)+iinutes 

1700 housel=house 

840 j=4:ke=4:fg=2:do=165.5:io=-8.7:ao=l.7:GO 

1250 LOCATE xlp,ylp:PRINT CHR*(241+boucle): 1 

1710 NEXT boude 

TO 880 

■jplanetellboude) 

1720 house=housell80/PI 

850 j=5:ke=4:do=71.4:io=-7:GOTO 880 

1260 LOCATE xlp+12,ylp:PRINT;USING’t*.*#’:1o 

1730 IF house>360 THEN house=house-360 

860 j=6:ke=3:do=68.3:»o=-7:G0T0 880 

ngitude:LOCATE xlp+19,ylp:PRINT signe$(sig+1 

1740 RETURN 

870 j=7:ke=7:dD=8.3:io=-1.5 

) 

1750 REH-calcul milieu du ciel- 

880 p=po(j)+pp(j)ln:i=lor(j)+lp(j)ln-p 

1270 ylp=ylp+2:IF ylp=15 THEN ylp=3:xlp=44 


890 e=e<j)îGOSUB 1560 

1280 NEXT boude 

1760 MC=ATN(TAN(ts)/COS(oe)) 

900 v=2IATN(TAN(u/2)ISOR((l+e)/(l-e))) 

1290 GOSUB 1370:60SUB 2170 

1770 HC=HC*180/PI 

910 o=oo(j)+op(j)tn:c=v+p-o 

1300 v2=4:x2=2:lims=10:li»i=0:CLS:PRINT CHR» 

1780 IF ts>PI/2 AND ts<3»PI/2 THEN ic=mc+180 

920 IF COS(c)=0 THEN d=c:G0T0 950 

(22)+CHR*(1); : FOR y=3 TO 23 STEP 3:L0CATE 1, 

1790 IF ts>3IPI/2 THEN mc=»c+360 

930 d=ATN(TAN(c)ICOS(i!j))) 

y:PRINT STRING*<78.154):NEXT y 

1800 RETURN 

940 IF COSIcKO THEN d=d+PI 

1310 FOR y=3 TO 23 STEP 3:L0CATE l.ysPRINT S 

1810 REH-calcul maison 11- 

950 lh=d+o:bs=ATN(SIN(d)ITANIi(j))) 

TRINGS(78.154>:NEXT y 


960 rs=a(j)I(l-elCOS(u)):xp=rslCOS(bs)ICOSd 

1320 FOR x=15 TO 76 STEP 15 

1820 FOR n=l TO 7 

h)+xs:yp=rs*COS(bs)*SIN(lh)+vs:zp=rs*SIN(bs) 

1330 FOR y=l TO 23 

1830 x = (-SIN(housel)»TAN(oe)ITANIIa)) 

970 r=SQR(xplxp+yplyp):b=ATN(zp/r): 1=ATN(yp/ 

1340 LOCATE x.y:PRINT CHR*<149):NEXT y,x:PRI 

1840 house=ts+(FN acos(x)/T) 

xp) 

NT CHR*(22)+CHR*(0); :LOCATE 3.2:PRINT'CONJON 

1850 hausel=house 

980 1F xp<0 THEN 1=1+P! 

CT10N":L0CATE 18.2:PRINT'OPPOSITION-:LOCATE 

1860 NEXT n 

990 GOSUB 1610:longitude(pas)=ld 

34,2: PRINT “TRI 60NE " : LOCATE 50,2: PRINT^ARRE* 

1870 house=house!180/PI 






































1880 IF house>360 THEN house=house-360 
1890 RETURN 

1900 DAT fi 379.25,5,284,25,5,319,25,5,284,25, 
5,253,25,5,239,25,5,253,25,5,239,25,5,213,25 
,5,190,100,5,190,50,5,159,50,5,190,100,5,190 
,50,5 

1910 DfiTfi 142,25,5,159,25,5,190,100,5,190,25 
,5,190,25,5,213,25,5,239,25,5,284,100,5,284, 
50,5,239,50,5,284,100,5,284,50,5.379,25,5,28 

4.100.5.284.50.5 

1920 DATA 190,25,5,142,50,5,150,25,5,142,25, 

5.150.25.5.142.25.5.159.25.5.142.100.5.142.5 
0,5,119,25,5,142,25,5,159,100,5,159,50,5,142 
,25,5,159,25,5,190,100,5.190,50,5,190,25,5.1 

42.50.5 

1930 DATA 150,25,5,142,25,5,150.25,5,142,25, 
5,159,25,5,142,100,5,142,50,5,119,25,5,142,2 
5,5,159,100,5,159,50,5,142,25,5,159,25,5,190 
,100,5.190,25,5,190,25,5,213,25,5,239,25.5.2 
84,100,5,284,50,5,239,50,5,284,100,5,284,50, 
5,379,25,1 

1940 DATA 4.0117,7.14254534e-2,1.3249,7.4229 
e-7,. 82304,5.6618e-7,. 205615,. 1222,. 3870981 
1950 DATA 3.6086,2.79631195e-2,2.2716,6.5572 
e-7,1.3229,4.36é>8e-7,. 006816,. 05923,. 72333 
1960 DATA 2.1776,9.146765B4e-3,5.8338,8.793e 
-7,,8516,3.7128-7,.093309,3.22948-2,1.523678 
1970 DATA 4.6879,1.4509868e-3,.2289,857e-9,1 
.7358,483e-9,.048376,.02284,5.202799 
I960 DATA 4.8567,5.8484028e-4,l.5974,412e-9. 
1.9686,417e-9,.054311,435e-4,9.552098 
1990 DATA 4.3224.205424e-9,2.9523,762e-9,1.2 
825,2.3824e-7,.047319,1.3482e-2.19.21694 
2000 DATA 1.5223,105061e-9,.7637,393 b- 9,2.28 
l,525e-9,.008262,3.1054e-2,30.112912 
2010 DATA 1.6406,701214e-10.3.8978,6.672e-7, 
1.9034,6.672e-7,.250236,.29968,39.438712 
2020 DATA 2.694,3.5515529,5.9059,5.771,1.769 
32338,9.3969,2.597,.87820859,14.989,3.091..3 
7648689,26.3641 

2030 DATA .434,3.32830711,4.877,4.472.2.2957 
1836,6.2464,6.081,1.39085442,8.723,3.857,.39 
404325,20.213 

2040 DATA LUNDI,MARDI,MERCREDI,JEUDI,VENDRED 
I,SAMEDI,DIMANCHE 

2050 DATA BELIER,TAUREAU,6EMEAUX,CANCER,LION 
,VIER6E,BALANCE.SCORPION,SAGITTAIRE,CAPRICOR 
NE,VERSEAU,POISSONS 

2060 DATA SOLEIL,LUNE,MERCURE.VENUS,MARS,JUP 
ITER,SATURNE,URANUS, NEPTUNE. PLUTON, ASCENDANT 
,M.DU CIEL,I,II,III,IV,V,VI,VII,VIII,IX,X,XI 
,XI1,JANVIER,FEVRIER,MARS,AVRIL,MAI,JUIN,JUI 
LLET,AOUT,SEPTEMBRE,OCTOBRE, NOVEMBRE,DECEHBR 
E 

2070 FOR j=0 TO 7 

2080 READ lor(j),lp(j),po(j),pp(j),oo(j),op( 
j),e(j),i(j),a(j) 

2090 NEXT j 

2100 FOR i=B TO 15:READ lorii),lp(i),a(i):NE 
XT i 

2110 FOR x=0 TO 6:READ a*:jour*<x)=a*:NEXT x 
2120 FOR x=l TO 12:READ a$:siqne$(x)=a*:NEXT 

x 

2130 FOR x=l TO 12:REfiD a$:planete$(x)=a$:NE 
XT x: FOR X=1 TO 12:REfiD fi*:TABLt*(X)=fl$:NEXT 
X : FOR Xd TO 12:READ A*: MOI S*(X)=A*: NEXT X 
2140 RETURN 

2150 LOCATE 34,25:PRINT CHR*(24); * (C)0nT 
INUER-(M)ENU ’;CHR*(24):80T0 2170 


2160 LOCATE 34,19:PRINT CHR*(24):“ ViCIQNT 

2640 TA6:y4=0:0RI6IN 175,207 

INUER-(M)ENU ’:CHR*(24) 

2650 FOR cerd95 TO 525 STEP 30 

2170 a*=INKEY*: IF a$=” THEN 2170 

2660 PLOT B5IC0S(cer),85»SIN(cer),3 

2180 IF a$=CHR*(67) OR a*=CHR*(99) THEN RETU 

2670 PRINT CHR*(230+y4);:y4=y4+l 

RN 

2680 NEXT cer 

2190 IF pre=0 THEN 60T0 2170 

2690 REM 

2200 IF A$=CHR*(77) OR A*=CHR*(109) THEN GOT 

2700 y5=l:0RI6IN 178,200 

0 4370 

2710 FOR cerd TO 5 

2210 GOTO 2170 

2720 long=longitude(cer)+180 

2220 y2=4:li«s=angle+ecart 

2730 long2dongitude(cer+5) + 180 

2230 li«i=ABS(angle-ecart) 

2740 PLOT lOOICOS(long),lOOtSIN(long),1 

2240 FOR tl=l TO 9 

2750 DRAM 130*C0S(1ong),130»SIN(long),1 

2250 FOR t2=t1+1 TO 10 

2760 PRINT CHR*(241+y5); 

2260 res=ABS( 1 ongitude<11)-longitude(t2)) 

2770 PLOT 100IC0S(1ong2),lOOtSIN(1ong2),1 

2270 IF res>li»s THEN res=360-res 

2780 DRAW 150IC0S(1ong2),150«SIN(long2),1 

2280 IF resdiis OR resUin THEN 2310 

2790 PRINT CHR$(241fy5+5);:y5=y5d 

2290 LOCATE x2,y2:PRINT p1anete*<t1):LOCATE 

2800 NEXT cer 

x2,y2+l:PRINT planete»(t2) 

2810 Iong3dongitude(11)♦180:1ong4=longitude 

2300 y2=y2+3 

(12)+180 

2310 NEXT t2,tl 

2820 PLOT 1001C0S(1ong3),100SS1N(1ong3), 1 

2320 RETURN 

2830 DRAM 170IC0S(long3),170«SIN(long3),1 

2330 REM-trace cercle letbode hedi kodja 

2840 PRINT “AS*; 


2B50 PLOT 100$C0S(long3+180),100$SlN(lonQ3+l 

80) 1 


2860 DRAM 170IC08<1ong3+180),170»SIN(long3+l 

2340 0RI6IN xc,yc:cl=2/r:x=r:y=0:i»=1+PI*r/8: 

80), 1 

FOR xt=0 TO ia:PLOT x,y,l:PLOT -x,y,l:PLOT x 

2870 PRINT’DS") 

,-y,1 : PLOT -x,-y,1 : PLOT y,x,1 : PLOT -y,x,l:PL 

2880 PLOT 1004C0S(1ong4),1OOISIN( 1 ong4), 1 

OT y,-x,1 : PLOT -y,-x,1 :x=x-d*y:y=y+dlx:NEXT 

2890 DRAM 170tC0S(Iong4),170tSIN(long4),t 

xt 

2900 P^INT'NC'i 

2350 RETURN 

2910 PLOT 100IC08llong4f 180), lOOISINdong4+l 

2360 REM -affichage laisons- 

80), 1 


2920 DRAM 170IC0Sllong4fl80),170ISIN(long4fl 

2370 60SUB 4090:X=8:Ÿ=2:FOR bouded TO 12 

80), 1 

2380 position=Misoniuwui.îe) 

2930 PRINT'FC'ilIF pr»-0 THEN 60T0 390 

2390 IF position <30 THEN sig=0:60TD 2420 

2940 TA60FF:y5»3 

2400 sig=INT(aaison(boucle)/30) 

2950 FOR xt*l TO 10 

2410 position=aaison(boucle)-(sig*30> 

2960 LOCATE 25,y5iPRINT CHRI(241fxt)f 1 ’ipli 

2420 »inutes=position-INT(position) 

nata*(xt) 

2430 «inutesd»inutesl60)/100 

2970 y5*y5+2 

2440 position=INTlposition)+«inutes 

2980 NEXT xt 

2450 LOCATE X,5+Y:PRINT'MAISON TABLE*(BOU 

2990 GOSUB 2170 

CLE):LOCATE X*13,5+y:PR I NT ; US IN6*#*.*#*;posi 

3000 MODE 2:MINDOMiO, 1,80,1,25:PAPER UPEN U 

tionsLOCATE X+20,5+Y:PRINT SI6NE*(SI6+1) 

:CLS:MINDOMtO,2,79,2,5:PAPER OiPEN IiCLSiLOC 

2460 Y=Y+2 

ATE 14,2iPRINT'CARACTERISTIBUES PRINCIPALES 

2470 IF Y=14 THEN Y=2:X=44 

DE VOTRE CIEL DE NAISSANCE 1 

2480 NEXT boude:6GT0 2550 

3010 MINDOMIO,1,80,5,25iPAPER liPEN OiCLSiLO 

2490 FOR zxl=l TO 10 

CATE 28,25: PR INT* <0 ONTINUER-(M)ENU*lMINDOM# 

2500 FOR zx2=l TO 12 

0,2,79,6,24:PAPER OiPEN llCLS 

2510 IF longitude(zxl)>=aaison(zx2) AND long 

3020 LOCATE 32,2:PRINT a SIGNEi"(SISNEKcirict 

itude(zxl)<«aison(zx2+l) THEN secteur(zxl>=z 

ert):y(*4:x<d0:F0R nd TO IOiLOCATE xf,ydP 

x2 

RINT planata*(n>; 1 fn 1 ;’ MAISON "îTABLEKhc 

2520 IF longitude(zxl)>=aaison(zx2) AND aais 

teur (n) )iyf*yf+2 

on(zx2+l)+360<390 THEN secteur (zxl)=zx2 

3030 IF yf=14 THEN yf=4 sxf*45 

2530 NEXT zx2,zxl 

3040 NEXT n 

2540 RETURN 

3050 REM 

2550 60SUB 2160 

3060 LOCATE 10,16:PRINT planete*(pld);' EST 

2560 MODE 1 iNINDONIO,1,40,1,25:PAPER 1:PEN 

LA PLANETE DOMINANTE DE VOTRE SI6NE*:60SUB 2 

0:CLS:LOCATE 2,1 :PRINT jour*(i);jour;aois;an 

170 

nee;"A“;“ ”;he;“h“; ai ; “an ‘;“T.U“:LOCATE 

3080 CLS:MINDOMIO,1,80,6,20:PAPER 1 :PEN 0:CL 

5, 25:PRINT“<0 ONTINUER-(M)ENU*:MINDOMtÛ,2,39 

S:MINDOMIO,2,79,7,19:PAPER 0:PEN 1 :CLS 

,2,24:PAPER 0:PEN 1:CLS:xc=180:yc=200:r=l00 

3090 LOCATE 15,4:PR1NT*P0UR PARFAIRE L’ETUDE 

2570 xc=180:yc=200:r=100:GOSUB 2330 

DE VOTRE THEME'iLOCATE 15,6:PRINT"CONSULTEZ 

2580 r=70:GOSUB 2330 

LES QUVRA6ES DE REFERENCES SUR LE SUJET 1 

2590 DES 

3100 LOCATE 25,13:PRINT'(M)ENU 1 :LOCATE 25,10 

2600 FOR a=180 TO 540 STEP 30 

:PR1NT'UN AUTRE THEME 0/N' 

2610 PLOT 100*C0S(a),lOOtSIN(a1,1 

3110 AldNKEYI: IF A*=" THEN 3110 

2620 DRAM 70*C0S( a) ,70*SIN (a), 1 

3120 IF A*=CHR*(77) OR A*=CHR*(109) THEN 60Î 

2630 NEXT a 

0 4370 
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3130 IF A*=CHR*(79) OR A*=CHR*(U1) THEM 60T 
0 410 

3140 1F A*=CHR*(78) OR A*=CHR$(110) THEH HDD 
E 0:LOCATE 6.12:PRINT*AU REVOIR !":LOCATE 1, 
24:END 

3150 GOTO 3110 

4090 REH-DESSIN TABLEAU. 


4100 HODE 2 

4110 LOCATE 1,25:PRINT STRINB*(Elû,206) 

4120 LOCATE 1,1:PRINT STRING*(28,206):LOCATE 
50,liPRINT STR1N6*<30,206) 

4130 LOCATE 28,4:PRINT STRING»(23,206):LOCAT 
E 1,20:PRINT STRIN6*(79,206) 

4140 FOR n=l TO 2:L0CATE 28,l+n:PRINT CHR*(2 
06):LOCATE 50,l+n:PRINT CHR*(206):NEXT n 
4150 FOR n=l TO 4:LOCATE 19,20+n:PRINT CHR*( 
206):LOCATE 64,20+n:PRINT CHR*(206):NEXT n 
4160 FOR n=l TO 24:L0CATE l,n:PRINT CHR*(206 
):LOCATE 80,n:PRINT CHR*(206) :NEXT n 
4170 FOR n=l TO 3:L0CATE 29,n:PRINT STRINb*( 
21,143):NEÏT n 

4180 FOR n=l TO 3:L0CATE 2,20+n:PRINT STRIN6 
*(17,143):LOCATE 20,20+n:PRINT STRING*(44,14 
3):LÛCATE 65,20+n:PRINT STRIN6*(15,143):NEXT 
n 

4190 LOCATE 31,2:PRINT CHR*(24);“TABLE DES H 
AISQNS*:LOCATE 3,22:PRINT■ TEHPS UNIVERSEL":L 
OCATE 28,22:PRINT jour*(i);jour ; MOIS*(»ois); 
annee:LOCATE 66,22:PR INT'TEMPS SIDERAL* 

4200 LOCATE 4,23:PRINT he;‘h*;ai ;“an*:LOCATE 
66,23:PRINT INT(tsh):*h';ts«;'anCHR*(24) 

4210 RETURN 

4220 HODE 2:INK 0,1:INK 1,26:B0RDER IliPAPER 
0 

4230 NINDOMtO,30,80,1,25:PAPER 1:PEN 0:CLS 


YAMAHA 



4240 NIND0NI0,31,79,2,24:PAPER 0:PEN 1:CLS 
4250 LOCATE 2,2:PRINT'LES COORDONNEES DU LIE 
U DE NAISSANCE 1 :PR INT* SONT EN DEGRES DECIHA 
UX* 

4260 PRINT* LA LONGITUDE DU LIEU EST NEGAT1V 
E A L ’ EST * : PR INT * DE SREENNITCH*:PRINT' il f 
DUR PARIS”îPRINT" LATITUDE: 48.50“:PRINT* L 
0N6ITUDE: -2.20" 

4270 PRINT:PRINT* LE JOUR,LE HOIS ET L’ANNEE 
DOIVENT ETRE*:PRINT* SEPARES PAR DES VIRGUL 
ES ...ex (24,01,1953) 

4280 PRINT:PRINT* L’HEURE DEHANDEE EST L’HEU 
RE DE NAISSANCE * :PRINT * CONVERTIE EN TEHPS U 
NIVERSEL*:PRINT: PR INT* ENTREZ OBLIGATQIREHEN 
T LES HINUTES HEHE SI" 

4290 PRINT" ELLES SONT EGALES A ZERO":PRINT: 
PRINT" EX 12,00" 

4300 NINDOMtO,1,30,1,6:PAPER 1 :PEN OîCLSiNIN 
DONttO,2,29,2,5:PAPER OiPEN 1:CLS:L0CATE 5,2: 
PRINT'COORDONNEES DU LIEU*:PRINT:PRINT* 

DE NAISSANCE" 

4310 NINDOMtO,1,30,6,25:PAPER 1:PEN 0:CLS:NI 
NDONtO,2,29,7,24:PAPER OsPEN 1:CLS 
4320 PRINT:INPUT* LATITUDE : * ; 1 ai 1atitude=l 
a:la-latPl/180 

4330 PRINT:INPUT" LONGITUDE :lo 

4340 PRINT:INPUT" DATE : * ;j,a,a :annee=a 

:»ois=i:jour*j 

4350 PRINT:INPUT" HEURE TU : * :he.ai :hs»(he+ 

•1/601/24 

4360 RETURN 


4370 HODE 2:NINDOMtO,25,58,4,20:PAPER l:PEN 
0:CLS:LOCATE 13,1 :PRINT*I-MENU-*":NINDONtO,2 
6,57,5,19:PAPER 0:PEN 1:CLS:L0C«TE 3.2:PRIN1 
*1.POSITION PLANETE":LOCATE 3.4 : PR INT“2.ASPE 
CTS”:LOCATE 3 ,ù:PRINT*3.TABLE MAISONS*:LOCAT 
E 3,8:PRINT"4.GRAPHIQUE* 



4380 LOCATE 3, 10:PRINT“5.CARACTERISTIQUES DU 
CIEL":LOCATE 5,12:PRINT"DE VOTRE NAISSANCE" 
:LOCATE 3,14:PRINT“V0TRE CHOIX:”; 

4390 INPUT rep:HODE 2:0N rep GOTO 1130,1130, 
2360,2560,3000 

4400 HODE 2:NINDONtO,1,80,6,20:PAPER 1 :PEN 0 
:CLS:LOCATE 25,20:PRINT"(0 ONTINUER* : NINDOW* 
0,2,79,7,19:PAPER OsPEN liCLS 
4410 LOCATE 15,2:PRINT"CE PR06RAHHE CALCULE 
TOUS LES ELEHENTS NECESSAIRES A* 

4420 LOCATE 15,4 : PR INT“L’ETABLISSEMtNT DE VO 
TRE THEHE ASTRaL* 

4430 LOCATE 15,6:PRINT"LES RESULTATS SONT DO 
NNES EN DEGRES ET HINUTES * 

4440 LOCATE 15,8:PRINT"SEXA6ESIMALES." 

4450 60SUB 2170:CLS:LOCATE 15,2:PRINT"POUR F 
ACIL1TER L’UTILISATION DE CE PR06RAHHE* 

4460 LOCATE 15,4:PR1NT"LA TOUCHE (H)ENU VOUS 
PERHET DE REVENIR SUR N’IHPORTE QUEL" 

4470 LOCATE 15.6:PRINT“ElEHENT DE VOTRE THEH 
E" 

4480 LOCATE 15,8:PRINT"LA PRECISION DE LH )A 
BLE DES HAISONS EST DE + OU - 1.5 DEGRE" 

4490 LOCATE 15,10:PR1NT"LE TEHPS SIDERAL EST 
AFFICHE EN BAS DE TABLE POUR CEUX* 

4500 LOCATE 15.12:PRINT”QUI VOUDRAIENT AHEL1 
ORER CELLE-CI* 

4510 RETURN 

4520 REH.HUSIQUE. 


4530 READ a,b,c 
4540 IF c=l THEN RETURN 
4550 SOUND 6,a,b,c 
4560 GOTO 4530 


Langage : FM voicing program 
Machine : Yamaha CX5M ou YIS503F 
+ SFK-01 


Suite des sons de Lyon musique qui nous ont bien plu. Nous 
aimerions bien que ceux qui n'arrivent pas à faire de nou¬ 
veaux sons nous écrivent quand même, ne serait-ce que 
pour nous donner leur avis. Vos suggestions seront les 
bienvenues (plus de sons, des explications sur la synthèse 



FM...) et même si vous vous en balancez, dites-le, que 
diable ! Synthé priez pour nous, des millions de fois ? 
Houaip ! La critique est aisée, mais l’art est minotaure. ■ 

Colette et Berthe MAVALET 
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Errata 

L’Atmos perd ses bits, mais l’auteur perd ses vers. Une toute petite erreur s’est glissée dans le listing du programme 
Super clavier (version Atmos). A la ligne 12030 il fallait lire F à la place du guillemet {« ). Dans le listing du programme 
Berger de M.V.O. n° 4 la dernière ligne, manquante, est : 20 050 data 177,B9,F9,39,29,29,29,29,EF : Corps Berger. 

Pour nous faire pardonner, on vous embrasse tous sous le guillemet. 


CAHIER DES 



Patrick Reboul 

Âgé de vingt-cinq ans, Patrick tra¬ 
vaille dans l’informatique. Il pro¬ 
gramme depuis deux ans et a com¬ 
mencé, comme beaucoup, sur ZX. 
Célibataire, c’est pour ses neveux 
qu’il a créé Ergos, un programme de 
cubes et de Légo. Il prépare actuelle¬ 
ment un jeu de rôle et d’aventure sur 
son Commodore 64. 



D ouble jeu éducatif : les cubes et 
les Légo. La partie concernant 
les cubes permet aux jeunes 
enfants de créer des images par empi¬ 
lement de figures. Ces figures, de for¬ 
mes et de couleurs diverses, sont à 
choisir par les utilisateurs. Comme 
dans la réalité, un cube en position ins¬ 
table refuse de tenir en équilibre et 


choit. Les montages ainsi réalisés peu¬ 
vent être sauvegardés sur cassette ou 
sur disquette. La partie concernant les 
Légo se joue par assemblage de figu¬ 
res possédant des ergots. Ceux-ci 
permettent d’accrocher les figures les 
unes aux autres. Les instructions d’uti¬ 
lisation sont données dans le menu. 
Tapez ce programme, mettez-le en 
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marche, asseyez vos enfants (dès 
l’âge de six ans) devant le clavier et ils 
vous laisseront lire votre journal tran¬ 
quille. Vous pouvez, à l’inverse, les em¬ 
pêcher de rester trop longtemps de¬ 
vant la machine : avant de taper 
« RUN », écrivez en ligne N° 10 : 
TH$ = « HHMMSS », (HH représente 
les heures, MM les minutes et SS les 
secondes). Dès que le temps que vous 
aurez donné se sera écoulé, une si¬ 
rène retentira pour vous prévenir et 
l’écran se figera. ■ 


Patrick REBOUL 


10 TH$="000309" : TI*="000000" ; G0TÜ4368 
20 PRINTLEFT*<VT*,VT+1 > ; : PR IHTMID* (HT J 1 
.. HT) ; RETURH 

30 POKE V+21,0Q*2*< CH-1> +123 
40 GETR* : IFR**"*-" THEN00SUB2379 : POKE V+2 î 
00*2* <CH-1> +123 :GETR* : IFKL=1THEH170 
50 IF R$=""THEN GOSUB 1160:GOTO 40 
60 FOR 1=1 TO LEN<CD*> 

70 IF R*=MID*<CD*, 1,1) THEH 90 

80 HEXT I : GOTO 40 

90 IF I>6 THEH 1=1-6:GOTO 120 

100 OH I GOSUB 180.. 270, 360,450,1060,1250 

110 GOTO 40 

120 IF CH=2 THEH 150 

130 OH I GOSUB 630,790,2078,540,1020 

140 GOTO 30 

150 OH I GOSUB 3836,2300,330,980 
160 GOTO 40 
170 RETURH 

180 REM - R - GHUCHE - 

130 IF X=0 THEH GOSUB 1430 GOTO 260 

200 X=X~1XI=X+1 

210 XB=P*(X>+NX 

220 POKE V+21,128:POKE v,XB 

230 POKE V+2,XB:POKE V+4,XB+7 

240 POKE V+6,XB : POKE V+8,XB—7 

250 POKE V+21,<00*2>* < CH-1> +129 

260 RETURH 

270 REM - 3 - DROITE — 

280 IF X=MX THEH GOSUB 1490: GOTO 350 

290 X=X+1 : XI=X+1 

300 XB=P*<X)+HX 

310 POKE V+21,128:POKE V ,XB 

320 POKE V+2, XB: POKE V+4,XB+7 

330 POKE V+6,XB:POKE V+8,XB-7 

340 POKE V+21, ( 00*2 ) *( CH— 1,' +123 

350 RETURH 

360 REM - Z — BRS —— 

370 IF 't'=0 THEH GOSUB 1430 GOTO 440 
380 V=V-1 : VI=V+1 
390 VB=P*CV)+HY 
400 POKE V+21,128 POKE V+1,VB 
410 POKE V+3,VB-7•POKE V+5,VB 
420 POKE V+7,VB+7 : POKE V+9,VB 
430 POKE V+21, < 00*2 > * < CH-1 > +129 
440 RETURH 

450 REM - U - HAUT - 

460 IF V=MV THEH GOSUB 1490:GOTO 530 

470 V=V+1 ; VI=V+1 

480 VB=P*(V>+HV 

430 POKE V+21,128:POKE v+l,VB 

500 POKE V+3,VB-7:POKE V+5,VB 

510 POKE V+7,VB+7 POKE V+9,VB 

520 POKE V+21,C 00*2>* < CH- 1> +129 

530 RETURH 

540 REM - "CRSR +" CHOIX BE CUBE - 



550 

QA=OR+ 

1 


560 

IF 0A= 

12 THEN OR» 

20 

570 

IF 0A> 

21 THEN OR» 

10 

580 

GOSUB 

2140: GOSUB 

5810 

590 

HT=36 : 

PR INT 

PR INT "13"; 

600 

IF 0A< 

20 THEH 620 


610 

GOTO 640 


620 

HT=31 : 

VT=19 GOSUB 

28 

630 

PRINT" 

.-*1 3BSMH5EÎM 

640 

IF ORS 

11 THEH 660 


650 

l_, M 10 Pi 

38 


660 

HT -3! 7 

VT=19 GOSUB 

20 

670 

PRINT" 

:®F3 PÜURIIIEiailtMIN' 

680 

RETURH 


690 

REM — 

- Fl EFFACE 

(CUBE) 

700 

IF EC( 

VI,XI>=-1 

THEH 770 

710 

IF VI = 

1THEHECCVI- 

1,XI>=-1 

720 

IF EC< 

VI-1, XI > o- 

1 THEH 778 

730 

HT =X:*2 

VT= v V*2 > +2 

: GOSUB 29 

740 

PRIAT 

• a ,m*, 


750 

ECCVI, 

XI)=-1 : EB(V 

I,XI)=1 

760 

GOTO 7 

80 


770 

GOSUB 

1340 


780 

RETURH 



730 

REM — 

- F7 POSE 

BU CUBE — 

300 

FRI HT 

" ■" ; 


810 

IP EC( 

VI, XI >0-1 

THEH 310 

82Û 

IF EC< 

VI+1,XI>=-1 

THEN 310 

830 

IF EC< 

VI + 1 , XI > = 0 

THEH 370 

840 

FOR 1 = 

13 TO 27 STEP 2 

850 

IF EC< 

VI + 1 , XI > = I 

THEN 310 

860 

HEXT I 



370 

ECCVI, 

XI >=00 : EBCV 

I,XI)=C 

880 

HT=X*2 

: v’T= ( V*2 > +2 

: GOSUB 20 

890 

PRIAT 

MC*<C+16)JLG*<00>; 

300 

GOTO 9 

20 


910 

GOSUB 

1340 


920 

RETURH 



930 

REM — 

- "CRSR t" 

CHOIX B'ERl 

940 

GOSUB 

2070 


950 

IF V<V 

F)O0 THEN 

379 

960 

GOSUB 

14y0 : GOSUB 

2070 

970 

RETURH 



98ü 

REM . 

- "CRSR +" 

ROTATION - 

990 

00 =( 10* 

2:IF 00>15 

THEN 00=00' 


IÔ00 POKE V+21,00*2* C CH-1 ;■ +123 
1.010 RETURH 

1020 REM — F3 MODE INVERSE <CUBE> - 

1030 IF ORS19 THEH C=NOT(C> ; XC(00)=C 
1040 GOSUB 1130 
1058 RETURH 

1060 REM - "ESPACE" COULEUR - 

1078 IFC:,0THEHC=C+1 IFC>15THEHC=2 

1080 IFC<8THEHC=C~1 IFC016THENC=-3 

1030 XC<00>=C 

1100 IF CH=1 THEH 1130 

1110 HT=31 VT=HH GOSUB 20 

1120 FRI HT "BS IMI";V<VF); 

1130 HT=36:VT=HH:GOSUB 20 

1140 PRINT UC*(C+16), LG*(TR >;"3"; 

1150 RETURH 

1160 REM - TEMOIN ŒRGÛS) --- 

1170 IFTI*>TH*THEH GOSUB1340 : GOTO1170 

1180 IF CH02 THEH 1240 

1190 HT=36 : IF EC<VI, XI >0-1 THEH 1210 

1200 VT=13 GOSUB 20:F'RIHT LG*<38)1 :GOTO 

1240 

1210 VT=20: GOSUB 20 PR INT LG* (. 39)1 
1220 GOSUB 28 FRI HT UC* CEE (VI, XI > + 16.>.: 
1230 PR INT LG* ( EC ( VI, XI> >, 

1240 RETURH 

1250 REM - "H" HEURE - 

1260 HT=31 : VT=0 : GOSUB 20 PF. I HT "«a".: 

1270 PRIAT LEFT*(TI*, 2) • "-" 

1280 PRINT MID*(TI*,3,2);"'", 

1290 PRIAT RIGHT*(TI*,2>;"B", 

1380 POKE1063,162 

1310 FOR 1=0 TO 800 HEXT I 

1320 GOSUB 20•PRIAT “3";LEFT*<BT*,3); 

1338 RETURH 

1340 REM - CHUTE DU SPRITE - 

1350 POKE 0,15:poke TH,15 : POKE TL,15 
1360 POKER,0*16+0:POKEFJ,15*16 POKE H,65 
1378 POKE V+21,129 
1380 FOR S=VD TO 248 STEF' 2 

1399 POKE V+0,XB■POKE V+1,S 

1400 POKE FL,S POKE FH,S 











1410 NEXT S F'OKE 14,0 

1.420 FOR 8= 15 TO 0 STEF-1 

1430 POKE 0,S : F'OKE fl, 15 : POKEFJ, 8 

1.440 POKE FH.. 40: POKE FL.. 200 ; POKE W, 129 

1450 HEXT S:POKE 14,0 

1460 POKE V+0,XD•'POKE V+1,VD 

1478 POKE V+21,00*2*C CH-1> +129 

1430 RETORN 

1490 REM — TOP 30NN0RE - 

1500 POKE 54296,15-POKE 54233,17 
1510 POKE 54279,255:POKE 54280,255 
1528 POKE 54285,240:POKE54283,0 
1530 POKE 54296,0 ■ RETIJRM 

1548 REM -SAUVEGARDE- 

1550 HT=30 : VT* 15 : GOSUB20 : PR I HT " SKF5 " 1 
1560 HT=0 : VT=0 : GO3UB20 : FRIHT" NOM DU DE 
SSIN [>6Lj "1 

1570 G0SUB2628 : HK*=R2* : IFES=1THEN1718 
1588 CR*=CHR*C13) 

1590 IFCO=1THENFI*=HK*: 00=1 : GOTO1618 
1600 FI*=HK*+".ERG"+",SEQ,"+"U" 

1610 HT=0 : VT=0 :GO3UB20: PRINT "SK ", 

1620 OPEN 1,CO,OC,FI $ 

1630 FOR I=0TO11 : FORJ=0TO15 

1648 FR INT# 1,EBCI, J) ; CR*.: ECCI, J) ; CR* 

1650 NEXTJ :NEXTI : CLOSE1 

1660 HT=8 ; VT=0 : GÛSUB20 : PR I NT " 3» " ; LEFT* ( B 

T*, 40), " SKI" ;LEFT*CBT*, 20), 

1678 HT=8 : VT=2 : OOSUB20 : PR I HT "SBJ ", 

1680 IFECC1,1 ')=~ 1 THEN HT=0 : VT=2 : GOSUB20 
PRINTIC*< EB Cl,1) +16 >,LG* < 26), : GOTO1788 
1690 HT-0 : VT=2 : GOSUE20: PRINTMC*<EB Cl,1) + 
16)1 LG *CEC C1,1)), 

1708 IFC0=1THEN G0SUB2198 


1710 RETURN 

1720 REM-DI3KASETTE- 

1730 G*=LEFT*CHT*,19) ; HT=8:VT=17 ; GO3UB20 


1740 

"0 i 

PRINT 

"5r";GT$; "V 
o" i " ; 

i'ISI** .",0*, 

1750 

PRINT 

" i a — 

; G*;" fi 

1760 

PRINT 

" i a ^ 

; G* ; " _ r, fi 

1770 

PRINT 

" i a v 

• Qf • " .XJ..X U 

1780 

PRINT 

" i a 

,G*;" fi 

1790 

PRINT 

"13 > Il - " 

L..' 

** 

G 

B 

9 

il 

l " ; " 

L ", GT*, 

:POKE2023,12 

5 : P0KE56295 .• 0 


1800 HT=11 :VT=12 :GOSUE20: PRINT" 3C0NCU ET 
REALISE PAR"J :HT=14 :VT=13 ; GOSUB20 


1810 PRINT"PATRICK REBOUL", 

1 828 HT* 12 ■' VT* 18 : GOSUB20 : PR INT" SB VOTRE F 
ICHIER 

1830 HT=11 : VT=19 : OOSUB20 ; PRINT"ERGOS SER 
fl SUR ?") 

1840 HT=11 : VT=22 : G0SUB28 : PR I NT " C8) sr-?l*l 

’n«k**isc 1 ) " ; 

1850 GETR* : CÜ=VALCR*) : IFCOOl ANDCOO 8T 


HEN1850 

1860 IFC0=8THEN0C=4 
1870 PR INT "13" J : RETURN 

1880 REM-LIRE LE FICHIER - 

1898 HT=38: VT=9 :G0SUB28: PRINT" »SF3"; 

1900 VT=@ : HT=0 : G0SUB28 ; PRINT" NOM DU DE 
33îN C<6LI "i 

1918 GO3UE2620:HK*=R2* : IFES=1THEN2060 
1920 IFCO=1THENFI*=HK*:OC=0:GOT01948 
1930 FI*=HK*+".ERG"+",SEQ,”+"R" 

1940 PR INT " Bi" .: : OPEN 1, CO, OC, FI * 

1950 FOR I=8T011 : FORJ=0TO15 
I960 IHPUT# 1,EB <I,J),ECCI,J) 

! 970 IF I<1 ORJ<1ORJ>14THEN2020 

1980 HT* C .J*2 ) -2 : VT* I *2 : GOSUB20 

1990 FRINTI4C*CEECI,J)+16)1 

2000 IF ECCI, J)=-l THEN PR.INTLO*C26)1 : GO 

TO 2020 

2010 PRINT LG*CECCI,J)); 

2020 NEXT J :NEXT I:CLOSE1 

2030 VT=0 :HT=0:GOSUB20:PRINT"Sfe";LEFT* C B 

T*,40), 


2040 IFCO*1THENG03UB2190 

2850 HT=0 : VT=2 : GOSUB20 : PR INT "HS MMI 

2060 RETURN 

2070 REM — FLECHE — 

2080 VF=VF+1 

2098 IF VF>4 THEN VF=0 


2100 IF TV=0 THEN POKE V+21,1:GOTO 2180 

2110 IF VCVF)=0 THEN 2080 

2120 POKE V+15,DF-VF*PF 

2130 HH= C C DF-VF#PF) /S )-5 

2140 Q0=0A+8+C2*VF) 

2150 IF 00=16 THEN 00=15 
2160 POKE V+21,00*2# C CH-1> +129 
2170 TR=00 : C=XC C 00) 

2180 RETURN 

2190 REM -BUFFER- 

2200 RESTORE 

2210 FÜRN=0T062 : READQ : P0KE832+N, 0 : NEXTN 
2220 FORN=0TÜ62 REflDQ:P0KE896+N,Q:NEXTN 
2230 FORN=0TO62:REflDQ:POKE960+N,Q:NEXTN 
2240 RETURN 

2250 REM -EFFACE ERGOS- 

2260 HT=3e VT=21 :G0SUB28: PRINT"SHF7", 

2270 HT=1 :F0RVT=2T023:GOSUB20 : PRINT" a*": 

LEFT*CBT*,23);:NEXTVT 

2280 FOR 1=1 TO 11 

2290 FOR J=1 TO 14 

2300 EBCI,J>=1 

2310 ECCI,J)=-l 

2320 EACI,J)=0 

2330 NEXT J 

2346 NEXT I 

2350 FORI=0T04 V CI)=28 :NEXTI 
2360 RETURN 

2370 REM -MENU- 

2380 KL=0 : IF CH=2 THEN 2738 
2398 POKEV+21,8 

2400 HT=ü: VT=0 :GOSUB20 PRINT"SHNOUVEAU J 

EU Ci#)”.: 

2410 HT=30 : F0RVT=2TG23 : GOSUB20: PRINT "SU" 

,LEFTî C BT*,10); :NEXTVT 

2420 HT=30 : VT=4 :GOSUB20 

2438 PR I HT "Fl nB" :• LG T- C 37 ) ; " 3" ; 

2440 HT=30:VT=9:GOSUB20 
2458 PRINT"F3 T’ ; DG*C 2 )i 
2460 HT=38 : VT*15 :GOSUB20 
2470 PRINT"F5 .T; DG* Cl); 

2480 HT=38 : VT*21•GOSUB20 
2490 PRIHT"F7 TÜ" .: DG*C0), 

2580 GH*="5BI" 

2510 GETR* : IFR*=""THEN2510 
2520 IFR*="«"THEN 2580 
2530 IFR*="$"THEN KL*1 : G0T02618 
2540 FOR 1=1 TO LENCGH*) 

2550 IF R*=MID*CGH*,1,1) THEN2570 
2568 NEXT I :GOTO2510 

2570 OHIGOSUB 1880,1548,2250 :GOT02370 
2588 HT=38 :FORVT=0TO23:GOSUB20 ; PRINT" SU " 

, LEFT* C BT*,10); NEXTVT 

2598 HT=0 ; VT=0 -GOSUB20 : PRINT"aoMENU <» 

2680 GOSUB5810 
2610 RETURN 

2630 R2*="":LR=8■ES=0 

2640 PR INT"-41".: : GET R* PRINT" II";: IFR**" 
"THEH2640 

2650 IFR*=CHR*C 27)THENES*1 :GOTO2720 
2668 IFR*=CHR*C13)ANDLR>0THEH2720 
2670 I FR*=CHR* C 28 ) ANDLR>0THEHPR I NT " III", 
LR=LR-1 : R2*=LEFT*CR2*,LR) : G0T02648 
2688 IFR*C”!"ORR*>"Z"THENGOSUB1490:G0TG2 
640 

2698 IF LR>=6THEN GOSUB1490 : GOTO2640 
27O0 R2*=R2*+R*:LR=LR+1 : PRINTR*, 

2710 G0T02648 
2720 RETURN 

2738 REM-MENU ERGOS- 

2740 POKEV+21,0 

2750 HT=8 :VT=0:GQSUB20■PRINT" «NOUVEAU J 
EU C*)", 

2760 HT=30:F0RVT-2T023 : GOSUB20: PRINT"SU" 
LEFT* C BT*, 10), NEXTVT 
2770 HT=33 F0RVT-3T06 : GOSUB20 : PRINT"■»"; 
LEFT*CET*,4): NEXTVT 
2780 HT=38 :VT=4:G0SUB2G 
2790 PR INT" 3F1 B"; LG* C12 >, "S" : 

2880 HT=3@ : VT=21 :GOSUB20 
2810 PRINT"F7 ">l",DG*C0y, 

2820 GETR*:IFR*=""THEN2820 
2833 IFR*="B"THEN 2860 
2840 IFR*="#"THEN KL=1 : G0T02898 
2850 IFR**"II"THEN GOSUB2250 
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2360 HT=38:FORVT=0TO23:GOSUB20 : FRIHT"3* 

;LEFT$CBT$,10>■ NEXTVT 

2870 HT=8 : VT=0 : GO3UB20 : PR INT" :«MENU < «-> 

2880 GOSUB5740 : G0SUB5810 
2890 RETURH 

2300 REM — TEST DE DEPOSE — 

2910 IF EC<VI,XI)(>-l THEN 3810 
2928 T=0 

2938 B(0> = 00 HND1 ■flB<0)*B<0) 

2940 B<1)*<00 RND2>72 : RB<1)=B<1> 

2350 B< 2 > = < 00 RND4 > /4 ' RB < 2 > =B < 2 > 

2960 E C 3 > ~ ( 00 RHD8 ) /S : RE C 3 ) -B3 

2970 IF ECCVI-1,XI >=-l THEN 3030 

2380 R<0)=CEC<VI-1,XI >RND4)74 

2990 IF fl < @ > =0RNDB C 0)=0 THEN 3110 

3800 IF R<0>RNDB<0)=1 THEN 3810 

3818 I FR < 0 ) O0ORB C 0 ) O0THENT=T+1 : E < 0 > =0 

3020 GOTO 3110 

3030 IF B<0>=0 THEN 3110 

3040 GIC0>= ECCVI-1,XI-1) 

3050 BI<0>* ECCVI-1,XI+1) 

3060 IF GI(0X1 AND DIC0K1 THEN 3110 
3070 DG ( 0 > = C EC < VI -1, X1-1) RND2 > /2 
3080 DD < 0 > = < EC < VI -1, XI +1 > RND8 > 78 
3090 IF DG<0> =0 OR DD<0>=0 THEN 3110 
3100 GOTO 3310 

3110 IF ECCVI,XI+1>=-1 THEN 3130 
3120 RC 1>*<EC<VI,Xî + l>RND8>78 
3130 IF RO >=0 RND B<1>=0 THEN 3260 
3140 IF RO) RND EO) = l THEN 3810 
3150 IF fl O ) O0 OR B 0)00 THEN T=T+1-B< 
1)=0 

3160 IF T>1 THEN 3810 
3170 GOTO 3260 
3180 IF EO>=0 THEN 3260 
3190 GIO > = ECCVI-1, XI + 1 ) 

3200 DI < 1 ) = EC C VI +1,XI +1> 

321G IF GI<1 )<1 RND DI O Kl THEN 3260 
3220 DOC1> = <EC(VI-1,XI +1>RND4> 74 
3230 DDCl>* EC< VI +1,XI +1> RND1 
3240 IF DG O ) =0 OR DDO)=0 THEN 3260 
3250 GOTO 3810 

3260 IF ECCVI+l,XI>=-l THEN 3330 

3270 fl < 2 > = ECCVI+1,XI >RND1 

3280 IF fl<2>=0flNDB<2)=0 THEN 3418 

3298 IF R<2>flNDBC2>=l THEN 3810 

3300 IFRf2)O0ORB<2><>0THENT=T+1 : EC2>=0 

3310 IF T>1 THEN 3810 

3320 GOTO 3410 

3330 IF B<2>=0 THEN 3410 

3340 GI<2>* ECCVI+1,XI+1> 

3350 DI<2> = ECCYI+i,XI-l> 

3360 IF GIC 2 Kl RND DI <2 Kl THEN 3410 

3370 DOC 2) = C EC <VI +1,XI +1)RND8)78 

3388 DD C2) = C EC <VI +1,XI-1>RND2> 72 

3390 IF DG<2>=0 OR DD<2>*0 THEN 3410 

3400 GOSUB 1340:GOTO 4350 

3410 IF ECCVI ,XI-1>=-1 THEN 3480 

3428 R <3 > = CEC < VI ,XI-1)RND2>72 

3430 IF RC3)=0RNDBC3)=0 THEN 3570 

3440 IF RCS)RNDB(3> = 1 THEN 3810 

3450 I FR C 3 ) O0ORB C 3 ) O0THEHT=T+1 BC3>=0 

3468 Rc3)=<ECCVI ,XI—l)RND2v72 

3470 GOTO 3570 

3480 IF BC3)=0 THEN 3570 

3490 GIC3)= ECCVI + 1,XI-1> 

3508 DIC3>= ECCVI-1,XI-1> 

3518 IF GI<3X1 RND DIC3K1 THEN 3570 
3528 DG<3)= ECCVI+l/XI-l)RND1 
3530 DD <3) = CEC C VI-1,XI-1)RND4)74 
3540 IF DGC3)=0 OR DDC3)=0 THEN 3570 
3550 GOTO 3810 

3560 IFRC3)O0ORBC3)O0THENT=T+1 BC3)=0 
3570 IF T>1 OR T=0 THEN 3810 
3580 EfiC VI.. XI ) = 1 

3590 ER C VI -1.. XI ) =Efl< VI - 1, XI ) +RBC 0 )+fl< 8 ) 
3600 ER C VI,XI +1)=Efi C VI•XI +1)+RBC!) +R C1 > 
3610 ERCVI + 1 .• XI )=ERC VI+1, XI ) +RBC2) +flC2) 
3620 ER <VI,XI-1)=E A CVI,XI-1)+RB<3)+R C 3) 
3630 ECCVI; XI>=00 : BE.VI,XI)=0 
3648 N=B C 8 > + C BCl)*2>+<BC 2)*4) + C B C 3)*8 • 
3650 WC=C 

3660 HT=X#2: VT*C V#2 )+2 -GOSUB 20 
3678 EB < VI, XI ) *C ; BE CVI, XI ) =C 
3630 PRINT 

3690 PRIHT WC*C WC+16);: PRINT LG#C N); 


3780 V C V F ) = V C t* F ) -1 ; T V—T V " ■ 1 
3710 IF V C VF ) 08 THEN 3780 
3720 HT=31 : VT=HH : GOSUB 20 
3730 PRINT "3* 

3740 POKE V+21,128 : GOSUB1490 ; GOSUB 2070 

3750 VT=HH:GOSUB 28 

3760 GOSUB 20 PRINT"Si iS#l";VCVF); 

3770 GOTO 3820 

3780 HT=31:VT=HH:GOSUB 20 

3790 FRI NT "»» IMI" ; VCVF) ; 

3800 GOSUB 1160:GOTO 3820 
3310 GOSUB 1340 
3820 RETURN 

3830 REM - DECROCHAGE - 

3340 IF ECCVI,XI)=-l THEN 4340 
3850 IF ERCVI,XIX>1 THEN 4340 
3860 00=ECCVI,XI) 

3370 MM C 0)=0■MM <1)=0 MM C 2)=0 MM C3)=0 
3880 M C 0 ) =8 : M C 1 ) =0 : M C 2 ) =8 : M C 3) =0. 

3390 BfiC0)= ECCVI-1,XI) 

3900 Bfl<1)= ECCVI7X1+1) 

3910 ERC2)= ECCVI+1,XI) 

3920 BRC3)= ECCVI,XI-1) 

3930 EBC0)= ECCVI,XI)RND1 

3940 BBC 1>= ECCVI,XI)AND2 

3950 EBC2)= ECCVI,XI)RND4 

3960 BBC3)= ECCVI,XI)RND8 

3970 IFBR C 0)=-1THENMC 0)=BBC 0) : GOTO 3990 

3980 MM C 0)= BRC0)RHD4 

3990 IFBRC1 )=--lTHEHMC1 )=BB< 1 ) : GOTO 4010 
4000 MM C1 ) = BRCDRND8 

4010 IF ER C 2)=-1THENM C 2)=BBC 2) : GOTO 4830 
4020 MM C 2)= BRC2)RND1 

4030 IFBRC3)=-1THENM<3)=BBC3) : GOTO 4050 
4040 MM C 3)= BR C 3 > RND2 
4050 N=MC 0)+MC1)+MC 2)+M C 3) 

4060 HT=X#2:VT=CV*2)+2:GOSUB 20 
4070 PR INT "■4 ,, ;LG#CN); 

4080 T=MMC 0 >+MM<1)+MM C 2 > +MMC 3) 

4090 HT= C X*2) +1 : VT*C Y*2)+2 : GOSUB 28 
4100 PRINT"Bi";MM#CT); 

4110 ER C VI-1,XI>=EflC VI-1,XI>-C MM C 0 >74)-B 
B C 8 ) 

4120 ERCVI,XI+1>=ERCVI,XI+1)-CMMC1)78)-< 
BBC 1)72) 

4138 ERCVI+1,XI)=ERCVI+1,XI)-MMC2)-CBBC2 

>74) 

4140 ERCVI,XI-1)=Efl<VI,XI-1)-<MHC3)72)-< 
BB C 3)78) 

4150 IF 00=15 THEN YF=4: GOTO 4200 
4168 IF 00=1 OR 00=2 OR 00=4 OR 00=8 THE 
H VF=8 : GOTO 4200 

4170 IFOO=5OROO=10 THEN VF=1:G0T0 4208 
4180 IF 00=3 OR 00=6 OR 00=9 OR Q0=12THE 
N VF=2 : GOTO 4208 

4190 IF 00=7 OR 00=14 OR 00=11 OR 00=13 
THEN VF=3 

4280 POKE V+15,DF-VF*PF:HH=C C DF-VF*PF)78 

N —S 

4210 VCVF)=VCVF)+1 ; TV=TV+1 
4220 POKE V+21,00*2#CCH-1>+129 
4230 HT=31 VT=HH:GOSUB 28 
4240 PR INT" II»"; VCVF); 

4250 00=CVFî(s2)+8 : IF 00=16 THEN 00=15 

4260 TR=00 

4270 HT=36:GOSUB 28 

4280 PRINT WCSCC+16>;LG#C00); 

4290 T=0 

4300 ECCVI,XI)=-l 

4310 ERCVI,XI)=0 

4320 EBCVI,XI)=1 

4338 GOSUB 1168 GOTO 4350 

4340 GOSUB 1340 

4350 RETURN 

4360 REM — GENERIQUE - 

4370 0T*="- 

4388 ET*=" 

4390 HT#= " 

4400 VTÎ=" 

4410 CD#="RSWZ H««*B" 

4420 FRINT"; :POKE 53248+21,0 
4430 POKE 53288,1 POKE 53281,1 
4440 GOSUB 5960 HT=10:VT=6:GOSUB 20:OOSU 
B 6020 : GOSUB1720 : GOSUB6100 















4450 50104490 

4468 REM - 

4470 KL=8 : PRINT" TJ"! : F'OKE 53248+21,0 

4430 PÜKE 53280,0 ; POKE 53231,1 

4490 IF K 1=0 THEN K 1=1 :GOSUB 4930 

4500 GOSUB 4700 

4510 GOSUB 6840 

4520 HT=4 : VT=6 :GOSUB 20 

4530 GOSUB 6028 

4540 GOSUB 6640 

4550 GOSUB 6340 

4560 PÜKEV,XD:POKEV+2,XD : POKEV+4,XD+7 
4570 POKEV+6, XI' : POKEV+8, XB~7 
4580 POKEV+1,VD:POKEV+3,VD-7 

4599 POKEV+5, VU :FOKEV+7,VB+7:POKEV+9,VD 

4600 POKE V+14,32 ; POKE V+15,DF 
4610 IF CH=2 THEN 4650 

4620 Ofi=10■00=18 : V( VF1 = 1 TV=1 ;TR=00 
4630 GOSUB2370:1FKL=1THEN4468 
4640 GOSUB 30:GOTO 4698 
4650 00=8 :ÛR=@:TV=5#NB:TR=00 
4660 GOSUB 5818 
4670 GOSUB 5740 
4680 GOSUB 30 
4690 GOTO 4460 

4700 REM --INITIALISATION PARTIE- 

4710 KL=0 : FOR VI=1 TO 11 
4720 FOR XI=1 TO 14 
4730 EB( VI» XI1 = 1 
4740 EC<VI,XI1=-1 
4750 EACVI,XI1=0 
4760 NEXT XI 
4770 NEXT VI 

4780 REM - 

4790 X=5 : V=5 : VF=0 : HH=15 
4800 XD=P#(X)+NX: XI=X+1 
4810 VD=P* < V 1 +NV : VI =V+1 
4820 FOR 1=0 TO 37 
4830 XC < I 1 = I NT < RND <1 1 * 14 ) +2 
4840 NEXT I 

4850 FOR 1=0 TO 4 : V ( I 1 =NB : NEXT I 
4860 RETURN 

4870 REM -RECOPIE- 

4880 HT=0:VT=2:GOSUB 20 
4890 FOR 1=1 TO 14 
4900 PRINT "^"1LGS<01! 

4918 NEXT I 

4920 LIST 7000-7050 

4930 rem mm iniT mm 

4940 KL=0 : F'= 16 : PF=24 : 0=2 : IIF=160 

4950 HX=28: MX»<236-NX >/P 

4960 NV=64 : MV=<224-NV1/F 

4970 SI=54272 : FL=SI : FH=SI+1 ; FJ=SI+6 

4930 W=SI+4 : A*SI+5 •' 0=SI+24 

4990 TL=SI+2 : TH=SI+3 

5000 V=532'43 : CC=55296 : CG= 1024 : KK=54272 

5010 HE=20:NB$=STRS<NB 1 :DIM V < NB 1 

5020 FORS=0TO1 : POKE2040+S,13+S : P0KEV+39+ 

S, 0 

5030 POKE2040,13 : P0KE2047,15 

5040 FORS=1T04:POKE2040+S,14:P0KEV+39+S, 

0 :HEXTS 

5050 F'OKEV+16,128: P0KEV+46, 1 : F'ÛKEV+39,0 
5060 FORJ=0TO4: V C J 1=NB:NEXT 
5070 GOSUB2210 

5080 REM -—MODULE DE LEGO- 

5090 HS= 'TBWn «■■■!" 

5100 BS= "5 I - J nil" 

5110 M$="Ma MBI 1 IIB" 

5120 GM*="Bra MBBB'-a MBB" 

5130 DMS="H3 ■ 'llllr, 

5140 GD$="«ra »i:«i«BH L a ■ j mbbi" 

5150 LPS=HS+GDS+BS 

5160 LBS=GD$+BS :PL*="7n«" 

5170 GBS=GMS+B$ ; GS=LEFTS<HTS,211 
5180 GLS=" Mil "1" 

5190 FLS="»m" 

5200 NMS="II" 

5210 REM -LEGO- 

5220 DIM LGSC401 

5230 LGSOl =HS+MS :LGS(01=MS 

5240 LÛT < 2 ) =DM$ LG*<31 =HS+DM* 

5250 LG*<41 =MS+BS LGS<51 =HS+MS+BS 
5260 LGS<61 =DMS+B*:LGS<71 =HS+DMS+B$ 
5270 LGSOl =GMS : LGSOl =HS+GMS 
5280 LGS< 101' =GD$ : LGS -Il 1 1=HS+GDS 

5290 LGS<121=GMS+BS : LGS<131=HS+GM$+BS 


5300 LGS 041=GDS+BS: LGS <15 1=HS+GDS+B* 
5310 LGS<16)=GL$ :LGS<171=NM*+MS+FLS 

5320 LGS<181="»H 3-MBB 3 " 

5330 LGS09; = "»H MBISTT 
5340 LGs< 20 >="«a m mata h " 

5350 lgs ( 2 ii=" «i^iaaia m " 

5360 LGS (221 = " ma ■ «Ilia " 

5370 LGS<23i="mans joiaia 
5330 LGS<241= "IB a MBI " 

5390 lgs(25i="«h arMBr " 

5400 lgs ( 261 ="ma mbi 

5410 LGS(271 = "*fc^aaiSk 
5420 LGS<291 = "IP' ''MiK 
5430 LGS(281 = "irVdIIIVi" 

5440 LGSC311 = "m4-4j!liH-F" 

5450 LGS(30i="mr-,:aai LJ " 

5460 LGS<331 = "II HJSBBI H " 

5470 LG*(321 = "m++*lBI++" 

5480 LGS(351 = "«h-r:aiH4" 

5490 LGS(341 = "»r-D!iai_J" 

5500 LGS ( 371 = " m-H-MBH-r-" 

5510 LGS (361 = " maSBMBlâÜ" 

5 520 LGS (381 = "^a ■ niai» ■ HUail:*' 

5530 LGS(39i="naa -«m mbbbi » 


5540 DGS ( 11 = " B~VJBI3 ” >11■ I■ I■ I 
5550 DGS (21 = " a - f 1 ■ I S’*' M ■ 1 «liai 


5560 dgs ( 0 1 =" a/MBBB maia»—" 

5570 REM -SPRITE FLECHE 7- 

5580 POKE V+16,128 POKE V+46,1 

5590 DIM MMSO01 REM—ERGO AU DECROCH' 

5600 MMS(0> = " Mai " 

5610 MMS(ll = "Wn!lBr 
5620 MMS ( 21 = " t MH " < 

5630 MMS (41 = " LJ " 

5640 MMS(81 = ">I rïll L n" 

5650 DIM WCS<321 : REM—COULEUR LEGO- 

5660 wws="t#k.*BîiJB!5Kan::" 

5670 J=0 

5680 FOR 1 = 16 TO 1 3TEP -1 :WC$<Jl = "a"+MI 
DS(NUS,I,11 J=J+1 NEXT 
5690 FOR 1=1 TO 16 : WCS<J1="B"+MIDS<WW$,I 
,11 : J=J+1 NEXT 

5700 DIM EB(12,151,ER(12,151,EC(12,151 
5710 D11*1 BE( 12,151,CE< 12, 151 
5720 DIM XC<331 
5730 RETURN 

5748 REM - NB - 

5750 HT=310=5 

5760 FOR 1=3 TO 15 STEP 3 

5770 VT=I:GOSUB 20 

5780 J=J-1 ; PRINT "B5",V<J11 

5790 NEXT I 

5800 RETURN 

5310 REM-GRAPH - 

5320 HT=36 : FOR VT=2 TO 17:GOSUB 20 


5330 PRINT"33 
5840 NEXT VT 
5350 HT=36 : PRINT 
5860 IF OA=0 THEN 
5870 VT= 3:GOSUB 
1611LGS(0A+161, 
5380 GOTO 5900 
5890 VT= 3:GOSUB 
1611LGS(0A+151, 
5900 VT= 6:GOSUB 
161lLGS<0A+1411 
5910 VT» 9 GOSUB 
1 

611 LGS(0A+1211 
5920 VT=12:GOSUB 
1611LGS(OA+10!, 
5930 VT=15:GOSUB 
611LGS(0A+ 311 
5940 C=XC(0A+8+C 
5950 RETURN 


"13" 1 

GOTO 5898 

20:PRINT WCS<XC<0A+161+ 


20 : PRINT WCS < XC<0R+151 + 
20:PRINT WCS(XC(0A+141+ 
20:PRINT WCS(XC(0A+121+ 

20 FRINT WCS(XC(0A+101+ 
20 : F'R I NT WCS < XC < OA+81 +1 
#VF 1 ! : PR I NT "3"! 


5960 REM -SOLEIL- 

5970 HT=0:VT=1:GOSUB 20 

5980 PR INT "SB- 2T1-, r-, 

-LES EDITIONS"! 

5990 PR INT " 3*TÎ ' —I II I I F- '^BiPRESEH 
TENT"1 

6000 PR INT ""« w w L —' '■ 

~ i. - , i n" ; LEFTS(BTS, 2511 



















6010 RETURN 

6020 REM-ERGOS- 

6030 ER*=LEFT*(HT*,19) 

6040 PRINT"«B _ "1ER*; 

6050 PR INT” I - U _JJ U' U" ; ER*, 
6060 PR INT" I _J3_H _a B L 3 H I 13 S_ 13 

Il ; . 

6070 PR INT” I I3_S \ SUH STB 13 B 13 
~";ERî; 

6080 PRINT" - 3 B~3 \ B - 3 B ~3 B~3 


6098 RETURN 

6100 REH-EXPLICATION CLAVIER- 

6110 FOKE53280,0 :HT=Ü VT=0 GOSUB20 FORI = 
0TO5 : PR INT" 33" ; LEFT*(BT*, 40 > ; • NEXTI 
6120 HT=3 : VT= 1 :GOSUB 20 
6130 PEINT" BBJ - :C HAUT BS!", 

6140 FR INT" BARRE Sf3 CHOIX ", 

6150 HT=3 : VT= 2 : GOSUB 20 

6160 PR INT "ESP - 33 GAUCHE H B", 

6170 PEINT" ESPACE :« DE LA SI 

6180 HT=3 : VT= 3■ GOSUB 20 

6190 PRINT"BSJS - 33 DROITE 53 B"; 

6200 PEINT" 33 COULEUR 53 ", 

6210 HT=3VT= 4:GOSUB 20 

6220 FRINT"BSE - 33 BAS >1 B", 

6230 PR INT" 3- ", 

6240 HT=8 : VT= 5 : GOSUB 20 

6250 PR INT "SUT- B"; 

6260 HT=G: VT=11■G0SUB2Û: FORI=8T012 : PEINT 
" 33" ; LEFT* ( BT*, 401', : NEXTI 


6270 PEINT" 33" ; LEFT*(BT*, 39) , : POKE 2023, 

224:POKE 56295,1 

6280 HT=7=VT=12:GOSUB 20 

6290 PRINT "ESP PARTIR DE L'AGE DE ", 

6300 PRINT"i:*5H , î*5 BANS."; 

6310 HT=7 : VT=14 : GOSUB 20 

6320 PEINT"38i DEPOSE B 30'; 

6330 PEINT" ENLEVE "1 

6340 HT=2: VT=15 : GOSUB 20 

6350 PRINT"BSF7 - aï DES H» B" ; 

6360 PEINT" FI - 313 LES 53 

6370 HT=7; VT*16 : GOSUB 20 

6380 PEINT"3H CUBES B B *3", 

6390 PEINT" CUBES ïl 

6400 HT=8 : VT=17 : GOSUB 20 

6410 PEINT"3DD - B 3", 

6420 PEINT"-"1 

6430 HT=7:VT=18 : GOSUB 20 

6440 FEINT" «S .JEU N'1 ES! TOUCHES 3»" , 

6450 PRINT" CHOIX "1 

6460 HT=2 : VT=19 : GOSUB 20 

6470 PRINT"SSF3 - 35 MODE BBS]".; 

6480 PEINT" CURSEUR 31 DES B ", 

6490 HT=7 ; VT=20 : GOSUB 20 
6500 PEINT"35 INVERSE BEü"; 

6510 PEINT" aa CUBES B ", 

6520 HT=8■VT=21 : GOSUB 20 

6530 PR INT "353-- B"; 

6540 PEINT" 3-", 

6550 HT=0:VT=23;GOSUB 28 
6560 PRINT"SU 1 " ;LEFT* (BT*,40), 

6570 PEINT" (BARRE ESPACE> SU 

ITE ... 

6580 F’OKE 2023,224 POKE 56295,0 
6598 HT=10 ; VT=6 ;GOSUB20;GOSUB6020 


6600 GET R* ; IFR*0" "THEN6600 


6610 HT=0:VT=24 GOSUB 20 

6620 PEINT "3 VEUILLEZ PATIENTER UN 

MOMENT ... "; 

6630 RETURN 

6640 REM - CHOIX DU JEU - 


6650 HT=5; VT = 3 ; GOSUB 28 
6668 PEINT" , LEFT* (BT*, 205 , 

6670 PEINT LEFT* (HT*,20)1 

6688 FRINT"CHOIX DU JEU ", 

6690 PRINTLEFT*(HT*,20),LEFT*(BT*,28); 
6700 HT=7: VT*11 :GOSUB 20 
6718 PRINT"Sr ;LG*(19>; "IMI«a",LG*(37), " 
"J LG*<3551 

6720 PEINT "IHWaa" ;LG*(37>; "’1I»IH",LG 
*(37); < 

6730 HT=18 : VT=12 : GOSUB 28 

6748 PEINT "ST ; LG*(7) i ":«*■■■■!" ; "B", LG*< 

14); "»n"; "n";LG*<5>; 

6750 HT=5; VT=19;GOSUB 20 
6760 print" ai a 


6778 

PEINT 

LEFT* (HT*,20 

> .i 

6788 

PR INT 

li CUBES =1 ; 

1 

ERGOT = 

6790 

PEINT 

LEFT* (HT*,20); 

6380 

PEINT 

' Si 

3 


6310 

GET R* CH=VAL(R*> 



6320 

IF CHOl AND CHOZ’ 

THEN 68 

6830 

RETURN 



6840 







6850 

POKE53280,0 



6868 

HT=0: 

,'T=0 GOSUB 2* 

1 


6870 

PEINT 

"■3", BT*, 



6388 

PEINT 

"Sa"; LEFT*(BT*, 38); 

6898 

PEINT 

"■";left*(bt* 

, 1 8 ) , 

6900 

FOR L 

=0 ro 2 i 



6910 

PEINT 

"aa 3 "; LEFT*(BT*,28) 

6928 

PEINT 

"ï!3 i";LEFT*(BT*, 10) 

6930 

NEXT 




6940 

PEINT 

"aa", LEFT*(BT*,30); 

6950 

PEINT 

,LEFT*(BT* 

9>; 

6960 

POKE 

'023,224 ; POKE 

56295,8 

6978 

RETURN 



6988 

REM - 

FORME DU SPRITE.0 — 

6990 

DATA 

0, 0, 0 


L 1 

7000 

DATA 

0, 8, 0 

* 

L 2 

7010 

DATA 

15,255,248 

' 

L 3 

7020 

DATA 

15,255,240 


L 4 

7030 

DATA 

15,255,248 


L 5 

7040 

DATA 

15,255,240 

■' 

L 6 

7050 

DATA 

15,255,240 

/ 

L 7 

7060 

DATA 

15,129,240 


L 8 

7070 

DATA 

15,129,240 


L 9 

7080 

DATA 

15,129,240 


L10 

7890 

DATA 

15,129,248 


lu 

7 1 80 

DATA 

15,129,248 


L12 

7110 

DATA 

15,129,240 

* 

L13 

7120 

DATA 

15,255,240 

/ 

L14 

7130 

DATA 

15,255,248 

s 

L15 

7140 

DATA 

15,255,248 


L16 

7150 

DATA 

15,255,248 

* 

L17 

7160 

DATA 

15,255,240 

* 

L18 

7170 

DATA 

0 7 07 0 

y 

L19 

7180 

DATA 

0, 0 , 8 


L28 

7190 

DATA 

0 7 0 7 0 


L21 

7200 

REM— 

-FORME DU SPRITE.l - 

7210 

DATA 

8, 8 , 0 

y 

L 1 

7220 

DATA 

0 7 0 7 0 


L 2 

7230 

DATA 

0, 0, 8 

■' 

L 3 

7240 

DATA 

07 07 0 


L 4 

7250 

DATA 

0, 0 , 0 


L 5 

f‘260 

DATA 

0 , 8 , 0 

y 

L 6 

7270 

DATA 

0,255, 0 


L 7 

7280 

DATA 

0,129, 0 

•' 

L 3 

7290 

DATA 

0,129, 0 

y 

L 9 

7300 

DATA 

0,129, 0 


L10 

7310 

DATA 

0,129, 0 


lu 

7320 

DATA 

8,129, 8 

•' 

L12 

7330 

DATA 

8,129, 8 


L13 

7340 

DATA 

0,255, 8 

y 

L14 

7350 

DATA 

0, 0, 0 


L15 

7360 

DATA 

0 , 8 , 0 

y 

L16 

7370 

DATA 

0 , 0 , 0 


L17 

7380 

DATA 

07 07 0 


LIS 

7390 

DATA 

07 07 0 

y 

LIS 

7480 

DATA 

0, 0, 0 

y 

L20 

7410 

DATA 

0 , 0 , 0 


L21 

7420 

REM - 

—SPEITE FLEC 

;HE .7 - 

7430 

DATA 

0, 0, 0 

✓ 

L 1 

7440 

DATA 

0, 0, 0 


L 2 

7450 

DATA 

0 7 07 0 


L 3 

7460 

DATA 

0, 0, 0 


L 4 

7470 

DATA 

0, 0, 0 


L 5 

7488 

DATA 

0, 0, 0 

y 

L 6 

7490 

DATA 

0, 0, 0 

y 

L 7 

7580 

DATA 

0, 4, 0 

y 

L 8 

7510 

DATA 

0, 6, 0 

■' 

L 9 

7520 

DATA 

0, 7, 0 

y 

L10 

7530 

DATA 

0,255,128 

y 

lu 

7540 

DATA 

0,255,192 

y 

L12 

7550 

DATA 

0,255,224 

y 

L13 

7560 

DATA 

0,255,250 

y 

L14 

7570 

DATA 

0,255,250 

■' 

L15 

7580 

DATA 

0,255,224 


L16 

7590 

DATA 

0,255,192 


L17 

7680 

DATA 

0,255,128 

y 

LIS 

7610 

DATA 

0, 7, 0 

y 

L19 

7620 

DATA 

0, 6, 0 

y 

L20 

7630 

DATA 

0, 4, 0 

y 

L21 
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HOMSON 


DES 

NOTES 

ET QUELQUES 

MOTS 


E n réponse à vos nom¬ 
breuses lettres, nous 
vous communiquons 
les coordonnées du club 
Thomson, BP 169, 93172 
Bagnolet Cedex, Tél. 
(1 ).48.97.37.37. Le serveur du 
club fournira aux adhérents 
une banque de données et 
d’autres avantages télémati¬ 
ques. Le prix de l'abonne¬ 
ment 250 F. 

Les synthétiseurs MIDI 
pourront se connecter à vo¬ 
tre micro-ordinateur, avec 
MIDI-PACK, une interface 
MIDI commercialisée par la 
société Logimus, son prix 
environ 1 500 F. 

T07, TO 7-70, TO 9 ont dé¬ 
sormais l’usage de la parole. 
En effet le synthétiseur vocal 
Synthevoc 1 de Techni-Mu- 
sique parle français et se 
connecte à l'arrière de votre 
machine. Pour moins de 
500 F le silence devient pa¬ 
roles. 

Toujours dans le domaine 
de la voix, Cedic-Nathan 
distribue aussi un synthéti¬ 
seur vocal de Technt-Musi- 
que, il se programme par 
phénomènes. Cette exten¬ 
sion « Parole » est vendue 
avec une cassette de dé¬ 
monstration et deux logi¬ 
ciels d'utilisation (765 F). 

Les Thomson sont prédis¬ 
posés à la communication. 
Grâce à un miniserveur, les 
écoles connecteront jusqu’à 
huit M05, TO7-70 ou T09 
ensemble gérés à partir 
d’une unité tête de réseau. 
« Le Miniserveur » de la so¬ 
ciété Péritek : 2 000 F. 

Pour émuler, créer son pro¬ 
pre serveur télématique, Lo- 


riciels adapte aux Thomson 
le logiciel Loritel que l’on a 
découvert avec Oric. Le logi¬ 
ciel et son câble-interface 
coûte moins de 400 F. 


CASSETTES, 

DISQUETTES 


Free Game Blot organise un 
concours avec comme prix 
un voyage à Rome, pour la 
sortie de son logiciel histori¬ 
que : Rome, Romulus et 
moi. Pour gagner il faut con¬ 
quérir et étendre ce qui sera 
l’empire romain. 

Si vous voulez rire et créer 
votre spectacle, Bolchoï de 
Coktel Vision est le logiciel 
adéquat. Vous composez la 
musique, concevez la mise 
en scène et vous n’avez plus 
qu’à admirer votre œuvre. 

Du côté des langages, Micro 
Application commercialise 
un macro assembleur pour 
MO 5. 


CHEZ 

LE LIBRAIRE 


Super jeux pour M05 et 
TO7-70 

Les Super jeux sont un con¬ 
densé de 50 programmes 
« longs » de jeux d’adresse, 
de réflexion et de hasard. Ils 
utilisent les possibilités des 
machines de belle manière. 
Pourtant ce qui tourne sur 
TO7-70 ne tourne pas tou¬ 
jours sur M05! Heureuse¬ 
ment PSI possède un numé¬ 
ro vert pour ceux qui ne 


trouveraient pas les modifi¬ 
cations, ce qui arrivera sans 
doute. 

J-F Sehan, aux Éditions du 
PSI 

Le dernier des Thomson ne 
possède pas encore l’abon¬ 
dante bibliothèque de ses 
prédécesseurs. Dans la col¬ 
lection « Conduite du... » les 
éditions Eyrolles présentent 
La conduite du T09 de 
G. Guillon. 

Cet ouvrage donne la liste 
des instructions du Basic 
128, exemples à l’appui, l'uti¬ 
lisation du DOS Iconique et 
un bref chapitre du langage 
machine. Pour débuter uni¬ 
quement. 


BONNES 

FICELLES 


Visite de la mémoire à la 
carte pour TO 7 et TO 7-70 
facilement adaptable pour 
MO 5. Vous entrez l’adresse 
de début de recherche en 
décimal, le programme vous 
donne un dump mémoire 
hexa et ASCII. Vous pourrez 
ajouter une remontée à la 
page précédente, la possibi¬ 
lité de passer à la page sui¬ 
vante ou encore l'option de 
modification de la mémoire. 


Alan Cugel 
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’ DUMP MEMOIRE 






29 

' ALAN CUGEL 






30 

CLS : INPUT "ADRE 

- P 

DE 

DEPART";ADR 

40 

PR INT 






50 

FOR ADR1=ADR TC 

AD 

R+i 

50 

STEP 3 

£0 

PRINT UE ING "% 


''/ » • 

he y 

$ (A 

DR 1 ) ; 


Cî = " " 






30 

FOR 1=0 TO 7 






30 

OCT=PEEK ( I+ADR1 

) 





109 

PR INT US ING "% 

f> 

HE 

X$ (OCT 

) ; 

110 

IF 0CTC32 OR OCT> 

127 

THEN 

n .$=C:$+ " , ’’ 

ELE 

ECT=Cf+CHR$ OCT 

) 





120 

120 

MF Y T T 






PRINT C$ : NEXT 

ADR1 




ADRESSE DE DEPART 

? 150 
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4F D2 4E 45 

58 

D 4 

44 

4 1 

O.NEX.DA 

9E 

54 Cl 44 49 

CD 

52 

45 

41 

T.DI.REA 

A 6 

C 4 4C 45 D4 

47 

CF 

52 

55 

.LE.G.RU 

AE 

CE 49 C6 52 

45 

53 

54 

4F 

.I.RESTO 

B 6 

52 C5 52 45 

54 

55 

52 

CE 

R.RETUR. 

BE 

52 45 CD A7 

53 

54 

4F 

D 0 

RE . . ST O . 

C 6 

45 4C 53 C5 

54 

52 

4F 

CE 

ELS.TRO. 

CE 

54 52 4F 46 

C6 

44 

45 

46 

TROF.DEF 

D6 

53 54 D2 44 

45 

46 

49 

4E 

ST .DEFI N 

DE 

D4 44 45 46 

53 

4E 

C7 

44 

.DEFSN.D 

E 6 

45 46 44 42 

CC 

4F 

CE 

57 

EFDB.O.W 

EE 

41 49 D 4 45 

52 

52 

4F 

D2 

AI.ERRO. 

F 6 

52 45 53 55 

4 D 

C5 

41 

55 

RESUM.AU 


Groscar 

Groscar va piquer les carac¬ 
tères dans la ROM et les affi¬ 
che en remplaçant chaque 
point par une BOXF. Ceci 
permet de dessiner un ca¬ 
ractère où l’on veut sur 
l’écran (X et Y) au point près 
et de la taille que l’on désire 
(T). Seuls les points de cou¬ 
leur de texte sont affichés, le 
fond n’est donc pas effacé. 


:0 ’Csracteres tailLe variahle- 
20 SCFEEN 1,0,0:CLSîLOCftTE 0,0.0 
30 '0=44678:'(105 
40 0=39469: 'TO 7 


50 W$="Nachinations“:X0=0:Y0=0 
60 FOP T=1 TC 5:C=T 
70 ’ Chaque caractère chaîne — 
80 FOR L=i Tü LEN(M) 

90 C»=KID*(Ht.L,l>:A=ASC(C$)-33: 
IF AO THEN 160 

100 ’ Un caractère sur 8 octets- 
110 FOR 1=0 TO 7 
120 PR=PEEK(At8+I+D>:P=128 
130 FOR J=0 TO 7 

140 IF PR AND P THEN X=X0+T*J:Y= 
YO-TI(1-8):60XF(X,Y)-(X*T-1,Y- T + 
1),C 

150 P=P/2:NEXT J:NEXT I 
160 X0=X0+TI8:!F XO320-TXS THEN 
X0=0:YO=Y0+T*8 
170 NEXT l;NEXT T 
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OMMODORE 

| tout. Chacune des disquet¬ 
tes est vendue 190 F. 

Trois turbo pour le 64. Ces 

turbo sont des utilitaires 
I (Turbo .10, Turbo 30, Turbo 

ROUTINES... 


C ommodore, qui a per¬ 
du 11 millions de dol¬ 
lars au cours de la 
dernière année fiscale, ne 
faiblit cependant pas sur les 
moyens quant à la promo¬ 
tion du dernier-né : « Ami- 
ga ». L'ordinateur qui dé¬ 
mode tous les autres bénéfi¬ 
cie d'une campagne publici¬ 
taire intensive : 40 millions 
de dollars pour ébruiter la 
nouvelle à la télévision, et 
dans la presse écrite. Le jeu 
en vaut peut-être la chan¬ 
delle puisque devant cet ef¬ 
fort 85 nouveaux distribu¬ 
teurs ont décidé de faire 
confiance à Commodore et 
sont venus grossir la liste 
des 662, parue dans le Wall 
Street Journal. Et quelques 
éditeurs de choix comme 
Electronic Arts prennent le 
risque de développer six 
produits sur « Amiga ». On 
estime généralement qu’en 
dépit des quelque 3 000 li¬ 
cenciements en un an, 
Commodore ne devrait pas 
faire faillite avant la fin de 
l’année. 

Commodore sans Tramiel, 
ça ne va pas fort, même 
avec une supermachine. Et 
Tramiel sans Commodore ? 
On dit qu’il s’attend à un fai¬ 
ble volume de ventes du ST 
en 1985, vous savez, le Ma¬ 
cintosh couleur, mais Jack 
dixit, « le Jackintosh devrait 
faire un malheur en 86 ». Il 
confirme d’ailleurs la pro¬ 
chaine naissance de TT, ver¬ 
sion 32 bits du ST, donc di¬ 
rectement concurrente 
d’Amiga. Qui fera les frais de 
la nouvelle guerre ? 

« Commodore Magazine » a 
commencé l'année tam¬ 
bours battants en ouvrant un 
service télématique. Ce ser¬ 
vice est destiné à améliorer 
le dialogue avec ses lec¬ 
teurs. Par exemple une boîte 
aux lettres avec réponse 
sous 24 ou 48 heures per¬ 


met de suppléer la rubrique 
courrier où tous ne trouvent 
pas leur réponse. Pour ac¬ 
céder à ce service, appelé 
CRAC, composez le 
16.1.36.15.91.55 + CRAC J. 


CASSETTES, 

DISQUETTES 


« Batteries Included » pro¬ 
pose une série de program¬ 
mes destinés à la gestion 
familiale. Cette série, déve¬ 
loppée pour les 64 et 128, se 
compose de huit logiciels 
sur disquettes. Rassemblés 
sous le nom Home Organi¬ 
ser ces programmes sont : 
un carnet d’adresses, un ca¬ 
talogue audio/visuel, un 
chéquier, un inventaire fami¬ 
lial, une liste d'adresse, un 
album de photos, diapos et 
films, un fichier de recettes 
et enfin une « collection » de 
timbres. Le maniement des 
différents fichiers d'Home 
Organiser est. simple. Les in¬ 
dications portées à l'écran 
et le manuel sont en fran¬ 
çais. Chaque disquette 
coûte 190 F. 

Les Editions Magnard et Al- 
matec commercialisent 
deux logiciels à caractère 
éducatif. Maîtremots et Or¬ 
thoverbes sont deux outils 
qui serviront autant les élè¬ 
ves que les professeurs, les 
parents ou les enfants. Maî¬ 
tremots est un outil pour 
apprendre l’orthographe et 
le vocabulaire. A vos Scrab¬ 
ble et mots-croisés. Ortho¬ 
verbes, lui, conjugue tous 
les verbes français (plus de 
15 000) à tous les temps de 
tous les modes (pronomi¬ 
nale, réfléchi, défectif). Cela 
donne plus d'un million de 
formes ! L'accentuation, la 
forme féminine (choix M/F), 
la forme négative, etc. Tout y 
est. De plus la sortie sur 
l’imprimante couronne le 


50). Sous la forme d'une car¬ 
touche, Turbo 50 permet 
d'accélérer le lecteur de 
disquette 1541 (5 fois 

plus rapide) et de program¬ 
mer l’alignement des têtes 
de lecture du datacassette. Il 
possède également 8 tou¬ 
ches de fonctions prépro¬ 
grammées, 16 commandes 
disques et cassettes et un 
bouton de reset. Grâce à 
Turbo 50, la copie sur cas¬ 
settes ou disquettes est 
aussi aisée que l’écriture de 
programme basic. La liste 
des fonctions de Turbo 50 
ne s’arrête pas là. Les autres 
Turbo possèdent un grand 
nombre des fonctions du 
Turbo 50, mais pas la totali¬ 
té. Les prix sont d'ailleurs en 
rapport. L’éventail des utili¬ 
taires qu’il offre est bien plus 
vaste. (385 F, 485 F et 589 F) 


PÉRIPHÉRIQUES 
ET CIE 


Une nouvelle interface gra¬ 
phique a fait son apparition 
sur le marché. Cette inter¬ 
face parallèle Centronics 
G-WIZ permet de connecter 
les C64 et C128 à la plupart 
des imprimantes graphi¬ 
ques parallèles Centronics 
(Star/Epson, Seikosha, Oki- 
dat, Mannesmann-Tally, 
Citoh). Il suffit de trois « câ¬ 
bles » pour la connecter. Le 
choix de l’imprimante s’ef¬ 
fectue en modifiant la posi¬ 
tion de huit interrupteurs. 
L'écriture ou l’utilisation d’un 
logiciel n’est pas nécessaire 
à son fonctionnement. L’in¬ 
terface est alimentée par 
branchement sur le port- 
cassette. La notice d’utilisa¬ 
tion est en français. Le prix 
de la G-WIZ est de 990 F. 

Les vieux PET peuvent en¬ 
core servir, en tout cas leurs 


fichiers. Grâce à l'interface 
3D de Digital Design Deve¬ 
lopment, il est possible de 
transférer des fichiers du 
PET au nouveau Commo¬ 
dore PC. Ces interfaces 3D 
IEEE et RS 232C transférant 
les fichiers des 8032 et 8296 
au Commodore PC ou à 
n’importe quel autre compa¬ 
tible. Son prix en Angleterre 
se situe aux alentours de 
2 500 F. 

Comment brancher simulta¬ 
nément Tool, Simon’s Basic, 
Cale Easy ? Ce sont toutes 
trois des cartouches et il 
n’existe qu’un seul port sur 
les 64. Grâce à un panier 
d'extension appelé « Card- 
board/5 », vous pouvez faire 
une sélection parmi 5 car¬ 
touches connectées en 
même temps sur votre mi¬ 
cro. Des interrupteurs per¬ 
mettent de choisir telle ou 
telle cartouche sans mettre 
hors tension l'ordinateur. 
« Cardboard/5 » dispose 
également d’un bouton de 
reset général et d’un fusible. 
Des témoins lumineux indi¬ 
quent la cartouche sous 
tension. 

Almatec distribue un double 
drive ou lecteur de disquet¬ 
tes compatible avec prati¬ 
quement tous les ordina¬ 
teurs de la gamme Commo¬ 
dore (CBM 3000, CBM 4000, 
CBM 8000, VIC 20, C64, 
Plus/4 et Cl28). Il se bran¬ 
che directement sur toutes 
ces machines, et ne requiert 
aucune interface. Il possède 
les interfaces IEEE 488 
(gamme professionnelle) et 
IEEE pour les autres. Sa ca¬ 
pacité de stockage est de 
2x170 Ko répartie sur deux 
disquettes (simple face, sim¬ 
ple densité). Les deux lec¬ 
teurs sont en 8 mais avec 
appel du drive en 0 ou 1. Ce 
double lecteur nommé MSD 
SD-2 coûte 4 290 F. 


BONNES 

FICELLES 


Monsieur, Veuillez trouver 
ci-joint un programme et un 
listing pour CBM64. C’est un 
menuet qui je l'espère vous 
plaira... 

Nous l’apprécions pour sa 
petite routine intéressante. 
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Pendant que les notes de 
musique s’égrennent, un pe¬ 
tit texte de présentation qui 
scintille de toutes les cou¬ 
leurs s'affiche à l’écran. Ce 
scintillement est totalement 
indépendant de l’exécution 
de la musique et quand on 
break le programme, ce 
scintillement continue. 


Bravo à Monsieur Manfredi 
Dominico. 



S PRINT CHR*(147) 

10 PRINT'UN INSTANT SVP...’ 

15 CS=0:FORI=49152T049394iREADA:P0KE1.A: 
CS=CS+A:NEXTI 
20 IFCSO20587THENST0P 
25 GOTO 185 

30 DATA 32,68,229,162,0,189,128,192 
35 DATA 157,73,5,189,151,192,157,153 
40 DATA 5,189,174,192,157,57,6,189 
45 DATA 197,192.157,137,6.189,220,192 
50 DATA 157,73,217,157,153,217,157,57 
55 DATA 218,157,137,218,232,224,23,208 
60 DATA 212,169,0,141,33,208,141,32 
65 DATA 208,120,169,70,141,20,3,169 
70 DATA 192,141,21,3,88,96,162,0 
75 DATA 189,73,217,157,72,217,189,153 
80 DATA 217,157,152,217,189,57,218,157 
85 DATA 56,218,189,137,218,157,136,218 
90 DATA 232,224,23,208,227,173,72,217 
95 DATA 141,95,217,173,152,217,141,175 
100 DATA 217,173,56,218,141,79,218,173 
105 DATA 136,218,141,159,218,76,49,234 
110 DATA 32,32,32,32,32,32,32,32 
115 DATA 13,5,14,21,5,20,32,32 
120 DATA 32,32,32,32,32,32,32,4 
125 DATA 5,32,10,5,1,14,32,16 
130 DATA 8,9,12,9,16,16,5,32 
135 DATA 18,1,13,5,1,21,32,32 
140 DATA 32,32,32,32,32,32,1,18 
145 DATA 18,1,14,7,5,32,32,32 
150 DATA 32,32,32,32,32,32,16,1 
155 DATA 18,32,13,1,14,6,18,5 
160 DATA 4,9,32,4,15,13,9,14 
165 DATA 9,3,15,32,1,2,3,4 
170 DATA 5,6,7,8,9,10,11,12 
175 DATA 13,14,15,1,2,3,4,5 
180 DATA 6,7,8 
185 SYS49152 

190 L1=54272:L2=54279: REM FREQUENCE PART 
IE BASSE 

195 H1=54273 :H2=54280:REM FREQUENCE PART 
IE HAUTE 

200 P0KE54296,15:REM VOLUME 
205 PQKE54277,28:P0KE54278,7 : REH ADSR 
210 PQKE54284,15:P0KE54285,170:REH ADSR 
215 T=TI:F=2.6 

220 P0KE54276,32:PQKE542B3,32:REH FORME 
D’ONDE (ARRET) 

225 READ A:IFA=0 GOTO 260 
230 READ X1,Y1,X2,Y2 


235 IF XI THEN P0KE H1,X1:P0KE L1,Y1:P0K 

E54276,33:REM NOTE,F0RHE ONDE DEBUT 

240 IF X2 THEN PQKE H2,X2:PtJKE L2,Y2:P0K 

E54283,33 

245 T=T+AIF 

250 IF T>TI GOTO 250 

255 GOTO 220 

260 FOR F=15 T0 1 SÎEP-1 
265 P0KE54296,F 
270 NEXTF 

275 FOR B=L1 T0 54296:P0KE B,0:NEXT B:RE 

M ARRET NOTE 

280 RESTORE:60T0 15 

285 DATA 8,0,0,0,0 

290 DATA 4,52,39,8,180,4,46,118,0,0 

295 DATA 4,43,219,17,103,4,46,118,0,0 

300 DATA 4,39,18,16,109,4,43,219,0,0 

305 DATA 4,46,118,14,162,4,43,219,0,0 

310 DATA 4,39,18,16,109,4,43,219,0,0 

315 DATA 4,34,207,13,10,4,39,18,0,0 

320 REM 

325 DATA 4,43,219,17,103,4,52,39,0,0 
330 DATA 4,46,118,0,0,4,43,219,0,0 
335 DATA 4,39,18,8,180,4,34,207,0,0 
340 DATA 4,39,18,13,10,4,34,207,0,0 
345 DATA 4,32,219,0,0,4,29,69,0,0 
350 DATA 4,26,20,11,158,4,0,0,0,0 
355 REM 

360 DATA 4,52,39,10,247,4,46,118,0,0 
365 DATA 4,43,219,0,0,4,46,118,0,0 
370 DATA 4,39,18,14,162,4,43,219,0,0 
375 DATA 4,46,118,9,196,4,43,219,0,0 
380 DATA 4,39,18,0,0,4,43,219,0,0 
385 DATA 4,34,207,13,10,4,39,18,0,0 
390 REM 

395 DATA 4,43,219,8,180,4,52,39,0,0 

400 DATA 4,46,118,13,10,4,43,219,0,0 

405 DATA 4,39,18,6,133,4,43,219,0,0 

410 DATA 8,34,207,8,180 

415 DATA 8,0,0,6,133 

420 DATA 8,0,0,4,90 

425 REH 

430 DATA 4,52,39,8,180,4,46,118,0,0 
435 DATA 4,43,219,17,103,4,46,118,0,0 
440 DATA 4,39,18,16,109,4,43,219,0,0 
445 DATA 4.46,118,14,162,4,43,219,0,0 
450 DATA 4,39,18,16,109,4,43,219,0,0 
455 DATA 4,34,207,13,10,4,39,18,0,0 
460 REM 

465 DATA 4,43,219,17,103,4,52,39,0,0 
470 DATA 4,46,118,0,0,4,43,219,0,0 
475 DATA 4,39,18,8,180,4,34,207,0,0 
480 DATA 4,39,18,13,10,4,34,207,0,0 
485 DATA 4,32,219,0,0,4,29,69,0,0 
490 DATA 8,26,20,11,158 
495 REM 

500 DATA 4,52,39,10,247,4,46,118,0,0 
505 DATA 4,43,219,0,0,4,46,118,0,0 
510 DATA 4,39,18,14,162,4,43,219,0,0 
515 DATA 4,46,118,9,196,4,43,219,0,0 
520 DATA 4,39,18,0,0,4,43,219,0,0 
525 DATA 4,34,207,13,10,4,39,18,0,0 
530 REM 


535 DATA 4.43,219,8,180,4,52,39,0,0 
540 DATA 4,46,118,13,10,4,43,219,0,0 
545 DATA 4,39,18,6,133,4,43,219,0,0 
550 DATA 8,34,207,8,180,8,0,0,6,133 
555 DATA 8,0,0,4,90 
560 REH 

565 DATA 4,39,18,6,133,4,34,207,0,0 
570 DATA 4,32,219,13,10,4,34,207,0,0 
575 DATA 4,29,69,12,78,4,32,219,0,0 
580 DATA 4,34,207,10,247,4,32,219,0,0 
585 DATA 4,29,69,12,78,4,32,219,0,0 
590 DATA 4,26,20,9,196,4,29,69,0,0 
595 REM 

600 DATA 4,32,219,13,10,4,39,18,0,0 
605 DATA 4,34,207,0,0,4,32,219,0,0 
610 DATA 4,29,69,6,133,4,26,20,0,0 
615 DATA 4,29,69,9,196,4,26,20,0,0 
620 DATA 4,24,157,0,0,4,21,237,8,180 
625 DATA 8,19,137,0,0 
630 REM 

635 DATA 4,39,18,8.55,4,34,207,0,0 
640 DATA 4,32,219,0,0,4,34,207,0,0 
645 DATA 4,29,69,10,247,4,32,219,0,0 
650 DATA 4,34,207,7,81,4,32,219,0,0 
655 DATA 4,29,69,0,0,4,32,219,0,0 
660 DATA 4,26,20,9,196,4,29,69,0,0 
665 REM 

670 DATA 4,32,219,6,133,4,39,18,0,0 
675 DATA 4,34,207,9,196,4,32,219,0,0 
680 DATA 4,29,69.4,226,4,32,219,0,0 
685 DATA 8,26,20,9,196,4,0,0,13,10 
690 DATA 4,0,0,12,78,4,0,0,10,247 
695 DATA 4,0,0,9,196 
700 REM 

705 DATA 4,52,39,8,180,4,46,118,0,0 
710 DATA 4,43,219,17,103,4,46,118,0,0 
715 DATA 4,39,18,16,109,4,43,219,0,0 
720 DATA 4,46, UB, 14,162,4,43,219,0,0 
725 DATA 4,39,18,16,109,4,43,219,0,0 
730 DATA 4,34,207,13,10,4,39,18,0,0 
735 REH 

740 DATA 4,43,219,17,103,4,52,39,0,0 
745 DATA 4,46,118,0,0,4,43,219,0,0 
750 DATA 4,39,18,8,180,4,34,207,0,0 
755 DATA 4,39,18,13,10,4,34,207,0,0 
760 DATA 4,32,219,0,0,4,29,69,0,0 
765 DATA 4,26,20,11,158,4,0,0,0,0 
770 REM 

775 DATA 4,52,39,10,247,4,46,118,0,0 
780 DATA 4,43,219,0,0,4,46,118,0,0 
785 DATA 4,39,18,14,162,4,43,219,0,0 
790 DATA 4,46,118,9,196,4,43,219,0,0 
795 DATA 4,39,18,0,0,4,43,219,0,0 
800 DATA 4,34,207,13,10,4,39,18,0,0 
805 REM 

810 DATA 5,43,219,8,180,5,52,39,0,0 
815 DATA 5,46,118,13,10,5,43,219,0,0 
820 DATA 5,39,18,6,133,5,43,219,0,0 
825 DATA 12,34,207,8,180 
830 DATA 12,0,0,6,133* 

835 DATA 16,0,0,4,90 
840 DATA 0 
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té sans diminution de la fia¬ 
bilité. Si vous fixez le nom¬ 
bre de secteurs par piste à 
19, vous aurez certes une 
plus grande capacité, mais 
cela diminuera la fiabilité. 
D’autre part, les valeurs 
choisies correspondent 
également à celles qui pro¬ 
curent les accès les plus ra¬ 
pides (en lecture et en écri¬ 
ture). La vitesse de transfert 
du système est véritable¬ 
ment exceptionnelle. Jugez 
plutôt : la démo de l'Oric At- 
mos, qui occupe 149 sec¬ 
teurs sur la disquette (soit 
un peu plus de 37 Ko), est 
toujours chargée en moins 
de 4 secondes. Ceci corres¬ 
pond à une vitesse de trans¬ 
fert de l'ordre de 10 Ko/se¬ 
conde. En fait, la vitesse est 
nettement supérieure si l’on 
ne tient pas compte du 
temps d'accès à la donnée 
que l’on désire charger, 
c’est-à-dire de la manière 
(nombre et ordre) avec la¬ 
quelle les secteurs sont ran¬ 
gés sur le support. Si vous 
êtes bricoleur et que vous 
avez un drive 5,25 pouces 80 
pistes connecté à votre Oric, 
vous pourrez en formater les 
disquettes avec Sedoric en 
80 (ou plus) pistes de 16 (ou 
plus) secteurs. Le nombre 
de pistes étant limité à 99, 
Sedoric ne permettra pas de 
formater les disquettes sur 
un lecteur 80 pistes double 
face. Il faudra alors le traiter 
comme un « double-simple 
face ». 

Assez parlé du formatage et 
de la rapidité, parlons un 
peu du reste : Sedoric pos- 


U LA 
BOMBE 
SEDORIC 


de disquettes et l’Oric ce qui 
diminue le nombre de fils et 
de prises. 

Contrairement au hard, le 
soft a été totalement revu et 
réécrit. La capacité de stock¬ 
age s’en trouve accrue. Avec 
le DOS Oric, la capacité par 
face était de 40 pistes conte¬ 
nant chacune 16 secteurs 
de 256 octets : ceci repré¬ 
sentait donc 160 Ko forma¬ 
tés par face. Avec Sedoric 
(c’est le nom de guerre du 
nouveau système d’exploi¬ 
tation), les valeurs par défaut 
sont de 42 pistes de 17 sec¬ 
teurs, soit 178,5 Ko par face. 
Ces paramètres sont totale¬ 
ment réglables par l’utilisa¬ 
teur lors du formatage d'une 
disquette. Le nombre de pis¬ 
tes peut varier entre 21 et 99. 
Le nombre de secteurs par 
piste varie, lui, entre 16 et 19. 
Les valeurs prises par défaut 
lors du formatage d’une dis¬ 
quette ne sont pas des 
choix dénués de sens : ils 
correspondent en effet à un 
accroissement de la capaci¬ 


V oilà plusieurs mois 
que l’on entend parler 
du nouveau lecteur 
de disquette Oric associé à 
son nouveau système d’ex¬ 
ploitation (SEDORIC). Cet 
ensemble est disponible 
chez Eurêka depuis décem¬ 
bre. Micro V.O. l’a testé pour 
vous. 

Lecteur : toujours 
simple face 

Première constatation : l’as¬ 
pect extérieur est le même 
que celui de l’ancien lecteur. 
Il s’agit toujours du classi¬ 
que lecteur rouge et noir au 
format 3 pouces. En réalité, 
l'intérieur a légèrement 
changé : il est possible de 
faire fonctionner le lecteur 
de cassettes avec l’unité de 
disquettes connectée à 
l’Oric ce qui n’était pas tou¬ 
jours possible avant (il fallait 
parfois adjoindre une petite 
résistance entre deux des 
bornes du bus pour que les 
lecteurs de cassettes et de 
disquettes puissent fonc¬ 
tionner ensemble). A noter 
que le lecteur n’est pas en¬ 
core double face. Il ne pos¬ 
sède qu’une seule tête de 
lecture ce qui contraint l’utili¬ 
sateur à retourner la dis¬ 
quette pour écrire sur l’autre 
face. D’autres petites modifi¬ 
cations apparaissent égale¬ 
ment l'alimentation est 
nouvelle. Elle ne chauffe 
plus ! L’élément responsa¬ 
ble des surchauffes d'autre¬ 
fois a été placé à l’extérieur 
du boîtier plastique sur un 
gros radiateur apte à le re¬ 
froidir. Vous n’aurez plus la 
surprise de retrouver une 
alimentation liquéfiée pour 
l’avoir laissée branchée 
toute une nuit. Le boîtier 
peut alimenter deux unités 


tiques qui auraient dû exis¬ 
ter depuis longtemps : ci¬ 
tons en vrac un RENUM 
permettant la renumérota¬ 
tion d'un programme Basic, 
un MERGE qui fusionne 
deux programmes Basic, un 
SEEK recherchant une 
chaîne de caractères dans 
un programme, un CHANGE 
remplaçant toutes les chaî¬ 
nes cherchées par d’autres 
et une numérotation auto¬ 
matique nommée NUM. 
Ceci constitue ce que le ma¬ 
nuel nomme les aides à la 
programmation. 

Un Basic étendu est égale¬ 
ment présent sur la dis¬ 
quette Sedoric. Celui-ci per¬ 
met tout d’abord de gérer le 
clavier correctement. On 
peut aisément passer d’un 
clavier QWERTY à un AZER- 
TY, l’accentuer à loisir, l’inhi¬ 
ber (par KEY OFF) ou le tes¬ 
ter de manière automatique 
(KEYIF). De même, l'utilisa¬ 
teur peut définir des touches 
de fonctions, puis sauvegar¬ 
der, charger ou modifier 
cette définition. La gestion 
des erreurs est également 
prévue. De nombreuses au¬ 
tres fonctions sont présen¬ 
tes , je vous laisse le plaisir 
de les découvrir. Pour ma 
part, j’ai beaucoup aimé 
CREATEW et WINDOW qui 
permettent dé créer avec un 
éditeur pleine page un mas¬ 
que de saisie à l’écran et de 
l’utiliser ensuite. 

La gestion des fichiers n’est 
pas non plus oubliée dans 
ce DOS. On y trouve bien 
entendu les accès séquen¬ 
tiels et directs avec toutes 
les fonctions nécessaires à 
leur utilisation mais aussi 
d’autres commandes qui 
permettront aux bricoleurs 
d’aller «jardiner» directe¬ 
ment dans les secteurs de 
leurs disquettes. On peut 
également sauvegarder 
l’écran HIRES (ou des par¬ 
ties de celui-ci) directement, 
chaîner des images ce qui 
permet, compte tenu de l’ex¬ 
trême rapidité du lecteur, 
créer des animations gra¬ 
phiques sans trop se fati¬ 
guer. 

Il est à noter que ce DOS 
possède de nombreuses 
variables réservées vous 
renseignant sur l’état de vo¬ 
tre système à un instant 
donné. On peut, par exem¬ 
ple, connaître les valeurs 
contenues dans les regis- 
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très du microprocesseur, 
savoir la position du curseur 
en mode HIRES, ou deman¬ 
der tout d’un fichier se trou¬ 
vant sur la disquette. Une 
annexe du manuel répertorie 
ces variables. Une autre 
donne les points d’entrée 
des diverses routines du 
DOS et les adresses des va¬ 
riables systèmes. Ceci sera 
d'une grande utilité pour le 
programmeur en assem¬ 
bleur. 

La disquette Sedoric con¬ 
tient une multitude d’autres 
utilitaires. En particulier, on y 
trouve deux fichiers nom¬ 
més ROMORICI et ROMAT- 
MOS permettant de charger 
à volonté l’ancienne ROM 
de l’Oric 1 ou celle de l’At- 
mos ce qui offrira la possibi¬ 
lité de refaire tourner tous 
les softs Orici. De même SE¬ 
DORIC est susceptible de 
convertir les enregistre¬ 
ments des Oric DOS VI.1 (XL 
DOS) et TDOS grâce à un 
utilitaire très convivial nom¬ 
mé CONVERT. On peut éga¬ 
lement effectuer des statisti¬ 
ques sur les instructions 
d’un programme Basic (on 
reconnaît ainsi les bons pro¬ 
grammeurs des mauvais à 
la proportion de GOTO que 
l’on trouve dans leurs oeu¬ 
vres). GAMEINIT permet de 
créer des disquettes de jeux 
avec un DOS très réduit 
(trois instructions y subis- 
tent : le chargement direct, 
le LOAD et le DIR) ce qui 
économise la place prise 
par le système d’exploitation 
sur une disquette où l'en¬ 
semble de ses fonctions n’a 
pas d’intérêt. 

Une rapidité 
exemplaire 

Incontestablement, ce lec¬ 
teur, et surtout son système 
d’exploitation constituent 
une réussite. D’une rapidité 
exemplaire (mon Mac en est 
jaloux !) cet ensemble cons¬ 
titue certainement le péri¬ 
phérique le plus utile pour 
votre Oric. De plus, le prix 
est attractif puisque l’en¬ 
semble lecteur de disquet¬ 
tes SEDORIC accompa¬ 
gné d’un manuel (en fran¬ 
çais bien sûr) très complet 
de 110 pages est vendu 
chez Eurêka pour 2 490 F ttc. 
Cependant, si vous possé¬ 
dez déjà un lecteur de dis¬ 
quettes, vous pouvez ache¬ 
ter simplement la disquette 


SEDORIC plus son manuel 
490 F ce qui constitue un in¬ 
vestissement modique pour 
conférer à votre Oric des 
qualités exceptionnelles. 


Frédéric Blanc 


BONNES 

FICELLES 


Décodons 
la page graphique 

Comme vous le savez, l'or¬ 
dinateur fonctionne à partir 
de 0 et de 1 (binaire). L’Oric 
n’échappe malheureuse¬ 
ment pas à cette règle. C'est 
ainsi que lorsque vous êtes 
en mode graphique, chaque 
point allumé correspond à 
un 1, chaque point éteint à 
un 0. Il est donc possible de 
faire des dessins unique¬ 
ment en changeant la valeur 
des cases mémoires de 
l'écran graphique, ce qui est 
plus rapide que l’utilisation 
des fonctions Basic et per¬ 
met une utilisation simple de 
l’écran en langage machine. 
Prenons un exemple : l’affi¬ 
chage d’un personnage 
dont nous représentons le 
dessin en binaire. Il faudrait 
ranger les codes dans la 
mémoire graphique de 
l’Oric, mais nous ne pou¬ 
vons utiliser l’instruction 
POKE puisque l’Oric n’est 
pas prévu pour interpréter le 
binaire. POKE (adresse), 
0101001 ne lui est pas com¬ 
préhensible. Nous devons 
donc convertir ces codes en 
hexadécimal (symbolisé par 
un ). Tout nombre est repré¬ 
senté sur 8 bits (case mé¬ 
moire qui peut prendre pour 
valeur 1 ou 0), dont deux 
sont « cachés», c’est-à-dire 
qu’ils ne jouent aucun rôle 
dans l’affichage. 

Notre personnage prend 
alors cette forme : 

Le deuxième bit en partant 
de la gauche doit forcément 
être à un, l’Oric sait ainsi 
qu’il doit afficher l'octet. 

Nous avons les codes, il ne 
nous reste plus qu’à les in¬ 
sérer dans la mémoire gra¬ 
phique (située de A000 à 
BFEO pour l’Oric 1 et l'At- 
mos) en n’oubliant pas 
d’ajouter 28 aux adresses 
d’écran pour passer à la 
ligne. 

Voici le programme pour af¬ 
ficher le personnage : 


10 HIRES 
20 BOUCLE = 0 
30 READ CODE 
40 POKE # A000 + BOU¬ 
CLE, CODE 
50 READ CODE 
60 POKE # A000 + BOU¬ 
CLE + 1, CODE 
70 BOUCLE = BOUCLE + 
40 

80 IF BOUCLE > 520 THEN 
END 

90 GOTO 30 


100 DATA#40,#40,#41, 
#40,#43,#60,#43, 
#60,#41,#40 
110 DATA # 43, # 60, # 
47, # 70, # 4D, # 58, 

# 41, # 40, # 41, # 
40, # 41, # 40, # 43, 

# 60 

120 DATA # 46, # 70, # 
4C, # 58 


Guillaume Murat 


équivalent Bits 

Hëxa cachés 


Ecran 


Un Octet 

f ' * ." I 

Des bits 
± ++++ 


■*40 

01 

00 

0000 

0 

0 

0 0 0 0 

0 0 0 0 

0 

0 


01 

00 

0000 

*40 

*4! 

01 

00 

0001 

0 

0 

o o o n 

0 0 0 0 

0 

0 


01 

00 

0000 

*40 

*43 

01 

00 

0011 

0 

0 

o o DD 

Do o o 

0 

0 


01 

10 

0000 

'60 

'43 

01 

00 

0011 

0 

0 

o o DE 

Do o o 

0 

0 


01 

10 

0000 

'60 

*4! 

01 

00 

0001 

0 

0 

o o o D 

0 0 0 0 

0 

0 


01 

00 

0000 

*40 

'43 

01 

00 

0011 

0 

0 

o o DI 

0 o o o 

0 

0 


01 

10 

0000 

*60 

*47 

01 

00 

01 1 1 

0 

0 

o DOD 

DD 0 o 

0 

0 


01 

11 

0000 

*70 

*4D 

01 

00 

1101 

0 

DD 1 

o DD o o 

0 


01 

01 

1000 

'58 

*41 

ot 

00 

0001 

0 

0 

o o o D 

0 0 0 0 

0 

0 


01 

00 

0000 

*40 

*41 

01 

00 

0001 

0 

0 

0 0 0 | 

0 0 0 0 

0 

0 


01 

00 

0000 

*40 

*41 

01 

00 

0001 

0 

0 

0 0 o 1 

0 0 0 0 

0 

0 


01 

00 

0000 

'40 

'43 

01 

00 

0011 

0 

0 

o o DD 

D o o o 

0 

0 


01 

10 

0000 

'60 

*46 

01 

00 

0110 

0 

0 

o DD o 

DD o o 

0 

0 


01 

11 

0000 

'70 

'4C 

01 

00 

1100 

0 

o DD o o 

oOD o 

0 

0 


01 

01 

1000 

'50 


Bientôt un nouvel Oric 
TELESTRAT 

Il s’agit d'une machine à vocation télématique se connectant 
sur un minitel dont elle peut utiliser l’écran et le modem. 
Cette machine est compatible avec les autres ordinateurs de 
la gamme Oric. TELESTRAT possède de nombreuses inter¬ 
faces (dont MIDI) et permet de créer un micro-serveur ou de 
composer des pages Vidéotex pour le minitel. Il sera com¬ 
mercialisé pour moins de 4 000 F avec un lecteur de dis¬ 
quettes intégré 3 pouces double face. Compatible avec la 
gamme Oric dont il peut recevoir les softs, Telestrat possède 
toute la panoplie d’outils télématiques nécessaires à l’ému¬ 
lation du Minitel auquel il peut se connecter (serveur, éditeur 
de pages vidéotex, etc.). 


Un peu d'Oric, un peu d'Atmos, Teles¬ 
trat est plus élégant. Il vous per¬ 
mettra même de voir votre Mi¬ 
nitel en couleurs. 
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ilWENT 

■tothe 

MARKET... 


P lus de 50% des mar¬ 
ques d’ordinateurs 
domestiques ont 
choisi le standard interna- 
tionnal MSX annonce la pub. 
Bravo ! Mais plus de 50% 
de leurs dignes représen¬ 
tants n’avaient pas l’air très 
gais au petit coktail célé¬ 
brant la décision de partir 
ensemble au combat pour 
faire comprendre au monde 
ignorant que MSX est le 
meilleur choix possible (si¬ 
non le seul). Mais n’ajoutons 
pas à la morosité ambiante. 
Nous aussi on y croit. Sinon 
cette rubrique n’existerait 


pas. Alors je suis allé au 
marché, mon p’tit panier 
sous mon bras et j’ai rap¬ 
porté du Spectravidéo. Et il y 
a déjà de quoi faire. Voir 
photo. 

1- Drive 5 1/4 pouces MSX 
+ alimentation + CP/M + 
MSX DOS avec docs : envi¬ 
ron 4 000 F. 

2- Carte 80 colonnes (sortie 
RGB) : environ 1 500 F. 

3- SVI 787 X’Press (drive 3 
1 /2 pouces et sortie RS 232 
incorporés): environ 6 000 F. 

4- Second drive pour 
X’Press : environ 3 300 F. 

5- Stringy floppy Drive SVI 


777 (lecteur de bande sans 
fin) : 1 200 F 

6 - Poigné boule MSX : envi¬ 
ron 280 F. 

7- Poignée de jeu plate 
MSX : environ 150 F. 


CASSETTES, 

DISQUETTES 


Tex 

Traitement de texte 
pour MSX 32 Ko 

Nous avons testé Tex au 
Texas avec Tex Avery 
(much) : ne protestez pas, 
nous attestons que, sous 
aucun prétexte, nous ne 
mentirions dans un tel con¬ 
texte. Textuel ! Soyons sé¬ 
rieux : un traitement de texte 
pour MSX, c’était une chose 
à voir. Il s’agit d’un logiciel 
normalement constitué, qui 
effectue sans accroc ce 
qu'on attend de lui, édition, 
insertion, modification, sub¬ 
stitution, suppression, re¬ 
cherches, copie et impres¬ 
sion. Eh oui, tout çà ! C’est 
assez remarquable pour un 
programme de ce prix. 


L'écriture, comme l’impres¬ 
sion, se fait en 80 colonnes ; 
40 seulement sont affichées 
à l’écran, mais un judicieux 
défilement latéral vous per¬ 
met de parcourir votre texte 
en entier. Rien ne vous em¬ 
pêche de prévoir une justifi¬ 
cation à droite inférieure à 
40 pour avoir tout sous les 
yeux. Vous pouvez utiliser 
les lettres avec accents et 
autres caractères spéciaux 
du MSX. Mieux vaut dans ce 
cas posséder un clavier 
Azerty. 

Le tout fonctionne à une vi¬ 
tesse fort acceptable, au 
moins tant que vos préten¬ 
tions littéraires sont limitées. 
Si vous désirez écrire un ro¬ 
man, nous vous conseillons 
de ne pas tenter l’aventure 
parce qu'alors, si par ailleurs 
Tex est excellent, Tex est 
lent. 

Comme pour pas mal d'au¬ 
tres traitements de texte, il 
faut un certain nombre 
d’heures de conduite pour 
manier la chose avec dexté¬ 
rité. En effet les commandes 
sont multiples : touches de 
fonction, CTRL, SHIFT CTRL, 
DEL, INS, etc. Le recours 
continuel au manuel est une 
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épreuve difficile. Combien 
de logiciels qui sont partis 
joyeux pour des courses 
lointaines dorment dans les 
tiroirs, abandonnés par leurs 
propriétaires découragés ! 
Mais là, Tex a pensé à votre 
bien-être : une pression sur 
la touche ESC et hop, la liste 
des commandes s’affiche à 
l'écran, une seconde pres¬ 
sion et pfuitt, elle disparaît 
pour vous rendre la main et 
le curseur à l'endroit où il se 
trouvait avant la manœuvre. 
C’est dans le mode impres¬ 
sion surtout que Tex est ex¬ 
tra. Si vous possédez une 
imprimante MSX ou Epson, 
aucun problème, tout est au¬ 
tomatique. Si vous possé¬ 
dez un autre type d’impri¬ 
mante, il vous sera demandé 
à l’écran les équivalences 
de code entre les caractères 
MSX et ceux de l’impri¬ 
mante. Ces équivalences 
sont sauvegardées dans le 
fichier que vous aurez créé, 
si bien que, en créant puis 
en copiant à l'infini dès le 
début un fichier vide, vous 
n’aurez à introduire ces don¬ 
nées qu’une seule fois. 

Son prix fait de Tex un traite¬ 
ment de texte particulière¬ 
ment compétitif malgré l’in¬ 
convénient du maniement 
de la version cassette. Mais, 
nous souffle-t-on, une ver¬ 
sion sur disquette devrait 
déjà être sortie lors de la pa¬ 
rution de ce numéro de Mi¬ 
cro V.O. 

Machine : MSX 32 Ko 
Editeur : Infogrames 
Auteur : Vincent Belliard 
Prix sur cassette : 173 F 
sur disquette : 350 F 


IMAGES, 
IMAGINE... 


« Défense d’afficher de la 
mauvaise humeur » du nu¬ 
méro précédent vous a bien 
plu. Mais certains points 
sombres subsistent. En rè¬ 
gle générale, cette rubrique 
est réservée aux bonnes fi¬ 
celles des machinations. 
Elle est devenue une corde 
à noeuds. Le but n’est pas 
de vous donner des pro¬ 
grammes tout faits, mais de 
vous aider à fabriquer votre 
boîte à outils, et de vous 
faire réfléchir. « Défense 
d'afficher... » est un pro¬ 
gramme ouvert, que vous 
devez améliorer. 


M. Jean-Pierre Vieux est 
déçu de ne pas pouvoir sau¬ 
ver la partie brouillon. En ef¬ 
fet, le programme ne le per¬ 
met pas. Il n’est pas fait pour 
cela. Ce programme permet 
de définir des caractères 
pour une utilisation ulté¬ 
rieure, dans un autre pro¬ 
gramme que vous fabrique¬ 
rez vous-même. Le brouillon 
ne sert qu'à tester les as¬ 
semblages de caractères. 
Christian Bailly-Granvaux, 
quant à lui, est déçu de ne 
pouvoir recharger les carac¬ 
tères qu’il a créés la veille. 
C’est normal. Je vous réser¬ 
vais ça pour plus tard (je 
sais, un mois, c’est long). Il 
propose de sauver les ca¬ 
ractères de la VRAM dans 
un fichier séquentiel. C'est 
une solution, mais ce n'est 
pas la meilleure, même si 
l’on crée une table d’indica¬ 
teurs qui permettent de sau¬ 
ver plus rapidement unique¬ 
ment les caractères qui ont 
été modifiés. 

Tout d’abord, quelques pré¬ 
cisions. Pour le moment, le 
programme ne sauve que 
les caractères qui ont été 
modifiés, mais seulement 
sous forme de lignes de 
DATA utilisables dans un 
autre programme. Mais 
comment sait-il qu’un carac¬ 
tère a été modifié ? C’est 
simple (bien que long en 
Basic). Il compare, octet par 
octet, les caractères de la 
VRAM avec le jeu de carac¬ 
tères de la ROM (celui qui 
permet d’initialiser la VRAM 
et que l’on trouve à partir de 
l’adresse 1BBF (H)). Il n'écrit 
une ligne de DATA corres¬ 
pondant à un caractère que 
si celui-ci a été modifié. A ce 
propos, Berthe me fait re¬ 
marquer qu’il faudrait pou¬ 
voir remettre un caractère à 
sa valeur initiale. Voilà donc 
une idée pour une nouvelle 
fonction. 

4318 FOR L=0 TG 7:VPDKE FN BR(CA 
, L ), F'EEK !RC+CA*8+U : NE XT: RETURN 

Cela étant dit, il y a une autre 
solution pour sauver et re¬ 
trouver un jeu de caractè¬ 
res : le sauver en binaire. 
Malheureusement, seuls les 
heureux possesseurs d’un 
lecteur de disquettes ont 
l’instruction qui permet de 
sauver une zone de VRAM 
directement (voir l’op¬ 
tion »,S » de BLOAD et 


BSAVE dans le manuel du 
Msx-Disc-Basic. Pour les 
autres il faudra écrire un pe¬ 
tit programme en langage 
machine (c’est faisable en 
Basic mais le traitement se¬ 
rait trop long). La ROM com¬ 
prend un sous-programme 
qui permet de transférer une 
zone de la VRAM vers la 
RAM (et un autre qui permet 
de faire l’inverse). Pour ap¬ 
peler ces sous-program¬ 
mes, il faut d’abord leur 
transmettre l’adresse de dé¬ 
part, l’adresse d’arrivée et la 
longueur de la zone à trans¬ 
férer. On ne peut le faire qu’à 
partir du langage machine. 
Nous allons réserver de la 
place mémoire pour faire le 
transfert du jeu de caractè¬ 
res redéfini et de la zone 
couleur. Puis nous ferons un 
BSAVE normal (ou BLOAD 
suivant le cas) afin de sauver 
la zone totale sur cassette. 
Le générateur occupe 2 Ko, 
soit 800H, et la table de cou¬ 
leur 32 octets, soit 20H (voir 
Image, Imagine N°1 et 2). 

USR : transfère le généra¬ 
teur de caractère de la 
VRAM vers la RAM. 

USR1 : transfère le généra¬ 
teur de caractère de la RAM 
vers la VRAM. 

USR2 : transfère la table des 
couleurs de la VRAM vers la 
RAM. 

USR3 : transfère la table des 
coufeurs de la RAM vers la 
VRAM. 

LOADer et SAVer 

Nous demandons le nom du 
fichier d’entrée (s’il y en a 
un) au début du programme. 
Par la suite, nous ne som¬ 
mes pas sûrs que l’alphabet 
sera encore lisible. C’est 
pour la même raison que 
lorsque l’on tape « CTRL 
STOP » aucun message ne 
s’affiche. Le tour de l’écran 
clignote. Appuyez sur la tou¬ 
che Fl si vous ne voulez pas 
sauver le fichier, et sur F5 
(après avoir mis le magnéto¬ 
phone en enregistrement) si 
vous voulez le faire. J’ai sup¬ 
posé que la sauvegarde 
s'effectuait à la sortie du 
programme. Mais vous pou¬ 
vez programmer vos tou¬ 
ches de fonctions pour sau¬ 
ver le fichier en cours de 
route. 

2 CLEAR IBS,IHCFFF:DP=4HD980 
105 60SUB 8000 'SP LH 
115 6GSUB 5100 'LOAD B!N 


5180 ' LOAB BINAIRE. 

5110 CLSîPRINT "LOAD FICHIER <0, 
N>";:R$=INPUT*<1): IF R$<> , 0‘ AND 
RK>*N* THEN BEEP:GOTO 5110 
5120 IF R$=*N" THEN 5199 
5140 LOCATE 3,5:PRINT "NOM FICHI 
ER ENTREE *;N0Ht;:LOCATE 19-.LINE 
INPÜT NOM* 

5150 LOCATE 0,7:PRINT "NON FICHI 
ER SORTIE ■;NON»;:LOCATE 19:LINE 
IMPOT N2M 
5168 BLOAD NÛH$ 

5170 A=USR1(8!:A=CSR3(3! 

5199 RETURN 

5200 SAVE BINAIRE- 

5220 CI=6:ON INTERVAL=28 SOSUB 2 
10 

5230 Rt=INKEV$:IF R*OCHR$(245)A 
NDR*OCHR*(249S THEN 5230 
5240 IF R4=CHR4(245) THEN 5299 
5250 A=USR'0):A=USR2(Bi 
5260 BSAVE N2MJ,SHD033,Î.HD82B 
5299 RETURN 

8830 CHARGE SOUS-PRCBRAHHES— 
3318 J=DP:FOR SP=0 TO 3 
8020 READ R$: DE (SP) =J 
3030 FOR 1=1 TO LEN'Rîi STEP 2 
8840 R=VAL("tcH’+HIDPiRî, 1,2) ! 
8850 POLE J,R:J=J+1 
8060 NEKT 
3070 NEKT 

8038 BEFUSR3=S£i0S:DEFUSR1=DEiî) 
:DEFUSR2=DE!2):DEFUSR3=DE(3I 

8099 RETURN 

8100 SOUS PROG LH-— 

8110 DATA E52180801180D081B888CD 
5900E1C9 

8120 DATA E52103D8110038818838CD 
5C8BE1C9 

3130 DATA E5210B20!188DB312080CD 
5900E1C9 

8140 DATA E52100D81100280S2883CD 
5C00E1C9 

9905 ON STOP 8O5UB0;CLB:S0BL1B 52 

08 

Christian nous signale que 
le petit programme des bon¬ 
nes ficelles du Thomson 
écrit par Michel Chaduteau 
(N°4, page 81) fonctionne à 
merveille sur nos MSX ché¬ 
ris si l’on prend soin de lui 
adjoindre les lignes suivan- 
tes * 

71 SCREEN 0 

101 COLOR 15,1,1 :SCREEN 
2 

Les Basic MSX et Thomson 
ont beaucoup de points 
communs. Nous essayerons 
de voir les différences et les 
adaptations possibles. 
Voilà, à vous de travailler. Si 
vous avez de bonnes idées, 
n’hésitez pas à nous les 
faire parvenir. 


François Dupin 
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ETES-VOUS UN HOMME DESIRABLE ? 
ETES-VOUS UNE FEMME DESIRABLE ? 


CONNAISSEZ-VOUS 

VOTRE MEMOIRE ? 
AIMEZ-VOUS FAIRE COMME 
ES AUTRES ? (SPECIAL ENFANTS) 
AVEZ-VOUS LES PIEDS SUR TERRE 


(SPECIAL ENFANTS) 


m MINITEL: 

■ TESTS 

ACCROCHE-CŒURS 


tention ce jeu est dange¬ 
reux, tâche d'en rire», parce 
que moi, ça m'a fait pleurer, 
tellement Walter m’a téléma¬ 
té mes VRAIES névroses... 
(Top secret !). 

Sur Ludotel (Télétel 3 LU- 
DO) Aimez-vous faire 
l’amour? par les pros des 
tests, Pierre Rouchaléou et 
Gérard Tixier. Vingt ques¬ 
tions courtes et imagées, 
genre « Sous les draps, 
c’est : le septième ciel, les 
sens dessus-dessous, un 
corps à corps, le lieu d'effu¬ 
sion, une mise en croix ?» 
Sur Nouvel Observateur (Té¬ 
létel 3 OBS) : Le test de 
Socrate, par ... Socrate ! 
Quatorze questions pour se 
connaître soi-même : bat¬ 
tant, sociable, affectif ou 
nostalgique... Une simplicité 
grecque, les résultats en 
pourcentages et les com¬ 
mentaires plus fiables que le 
meilleur oracle ! 


L ’écran du Minitel peut 
devenir le miroir magi¬ 
que. Dévoiler le pro¬ 
fond de l’âme, éclairer les 
détours du cerveau et analy¬ 
ser la carapace du carac¬ 
tère, facile ! Les tests, avec 
leur mystère, leur humour, 
leur illusion et leur vérité, 
nous reflètent tel qu’on est 
ou tel qu’on aimerait être. 

On se reconnaît soi-même 
autant par les tests que l'on 
choisit que par les autres, 
ceux qu’on ne ferait pour 
rien au monde. Moi, tout de 
suite, je me suis précipitée 
vers les tests de quotient in¬ 
tellectuel. Comme je n’ai pas 
obtenu les 500 points du gé¬ 
nie sur DEFI (Télétel 3 DE¬ 
FI) et que, sur RUSFI (Télétel 
3 RUSFI), je régressais de 
plus en plus, pfff, j’ai décidé 
de poursuivre mon explora¬ 
tion sur les services Télétel. 
J’ai découvert qu’on propo¬ 
sait des Quizz, des psycha¬ 
nalyses et des « mental 
strip-tease». Ces tests ne 
sont pas plus élaborés que 
ceux qu’on trouve depuis 
des dizaines d’années dans 
des journaux ou dans des li¬ 
vres, mais leur grand avan¬ 
tage est que les résultats 
sont immédiats et que les 
réponses donnent souvent 
l’impression d’être person¬ 
nalisées. 


Sur Funltel, le plus désirable de tous les tests. Vingt questions, 
parfois Indiscrètes, pour découvrir son potentiel érotique et 
savoirs/, oui ou non, on est une femme ou un homme désirable... 

son « potentiel érotique... ! » de sucette mais laisse mes 
Ah ! Ah ! Ah ! Le mot « po- fraises tranquiles, tiens ! tu 

tentiel » nous protège et as les mêmes moustaches 

nous rassure, il laisse une que mon papa !... ». Un 
marge de sécurité entre soupçon de brouillard 
l’imaginaire et la réalité. Je « Qui veut vous avoir ne doit 
me lance, froide comme un pas hésiter à être adroit 
glaçon. Première question : comme un singe, rester sur 
« Pour mieux découvrir Tau- sa faim, perdre son latin... ». 
tre, il convient de Tapprivoi- Un parfum d’érotisme 
ser, s'infiltrer dans son jardin « Vous voulez le séduire, la 
secret, provoquer des panoplie minimum : martinet 

chocs, s’étonner sans noir et bottines rouges, 

cesse, dérouter et débus- porte-jarretelles et sifflet 
quer?» Mystère absolu, rouge, loup noir et rouge à 

Que répondre ? J’y vais car- lèvre, lunettes noires et slip 
rément au pif, et je m’infiltre rouge?» (Bonjour Sten- 

dans son jardin secret. Les dhal !). Une pincée de pro¬ 

questions suivantes jouent vocation « Où pourriez- 
avec une ombre de mys- vous faire l’amour (ah ah ! le 
tère : « La jalousie fait par- conditionnel I) le plus natu- 
ler : la voisine, le miroir, le rellement du monde ? Dans 
serpent, le corbeau ou le re- un ascenseur, dans un taxi, 
nard???», Une nuance sur un tapis roulant», ho... 
d'humour : « Qu’a vraiment ho... Bon, les vingt réponses 
dit le petit chaperon rouge données, avec le plus de 
au loup : mets la patte au sensualité, de charme, d’ex- 
panier mais ne mange pas périence, de lascivité, de lu- 
!a galette, grignote un peu xure et de volupté possible, 


Blaireau 
ou désirable ? 


Sur Libération (Télétel 3 
LIBE) : Etes-vous un blai¬ 
reau ? Un piège à éviter ! J’y 
suis tombée les yeux fer¬ 
més. J'étais partie avec 
l’idée que je ne risquerais 
rien, ne me sentant pas blai¬ 
reau du tout... Ben, hé hé... 
plantée dans le sens du 
poil ! Paraît que je suis un 
«blaireau qui s’ignore!» 
(les pires !). 

Sur Funitel (Télétel 3 FUNI), 
je rencontre enfin le plus dé¬ 
sirable de tous les tests : 
« Etes-vous une femme dé¬ 
sirable ?» de Pierre Roucha- 
leou et Gérard Tixier. Vingt 
questions pour découvrir 


Jeux 

dangereux? 


Sur Tilt (Télétel 3 TILT):Au- 
topsiez-vousl de Walter Le- 
wino. « Faites votre psycha¬ 
nalyse. Etes-vous sentimen¬ 
tal, sociable, sensuel ou 
cérébral?». On est heureu¬ 
sement averti par un : « At¬ 
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Sur C. Q.F.D. : le test piège qui peut vous faire découvrir avec 
horreur que vous êtes un vrai blaireau I 


hop, le commentaire final, 
assez long et encourageant. 
J’apprends que je n’ai pas 
trop à m’en faire côté séduc¬ 
tion, que ma tendance nym- 
phomaniaque est refoulée 
(ouffff I) et que mon « poten¬ 
tiel» de sex-appeal, est... 
(achtung I) ravageur ! Mais 
on me conseille de faire at¬ 
tention aux courts-circuits. 
Aïe ! Aïe ! Je viens de 
m’électrocuter sur la touche 
«connexion/fin» du Mini¬ 
tel ! 


Nuits de Chine, 
nuits câlines? 


Forte de ces certitudes, je 
me rue sur RUSH (Télétel 3 
RUSH), pour savoir si j’utili¬ 
serai mon sex-appeal ce 
soir. Le test qui m’intéresse : 
Passerez-vous la nuit en¬ 
semble ? 

Mystère... Il faudrait être 
deux pour ce test de com¬ 
portement. Ben non... Une 
personne, ça suffit. Comme 
si, pour passer la nuit en¬ 
semble, l’avis de l'autre ne 
comptait pas ! Si je réponds 
correctement aux dix ques¬ 
tions, l’autre ne pourra pas 
refuser... Bon, je commence 
toute seule. Hé hé, c’est par¬ 
ti pour le premier rendez- 
vous. Pour aller le (ou la) 
chercher il faut choisir entre 
une vieille Aronde décapota¬ 
ble, une 205 GTI avec, bien 
en évidence, le nom de l’en¬ 
treprise, ça ne fait pas chô¬ 
meur, ou alors une R12 mu¬ 
nie d'un klaxon italien, genre 
macho extraverti. Sachant 
que la mode est plutôt por¬ 
tée vers le rétro, hop, je 


saute au volant de la vieille 
Aronde décapotable. Il ne va 
plus se sentir, c'est sûr ! En¬ 
suite, direction dîner. Mais 
où allons-nous manger? Là 
encore, trois choix : un re¬ 
pas de famille (un peu fort 
quand même !), un endroit 
cool et sympa, ou alors la 
grande classe nouvelle cui¬ 
sine, avec en prime la gaffe 
inévitable pour faire « je me 
sens à l'aise», c’est-à-dire 
renverser la bouteille de vin. 
Evidemment, pour arriver 
plus vite au but, la troisième 
proposition permettra tou¬ 
jours de glisser un discret 
« tu veux passer te changer 
chez moi ? J’habite tout 
près...» Mais c’est un peu 
trop brutal... Et il y a encore 
huit questions à tenir, alors 
j'opte pour un chinois cool. 
Bing ! Le commentaire m’ar¬ 
rive en plein dedans : « Ca y 
est, vous voulez déjà vous 
rendre intéressant...» J’ai 
honte... j’essaie de me rat¬ 


traper à la question suivante, 
qui, elle, délire carrément : 
«A table, vous commande¬ 
rez... » Ouh la la ! Ca va de la 
tactique émotionnelle (un 
chuchotement de « laissez- 
moi faire...») au désintéres¬ 
sement le plus complet : fri¬ 
tes plus mayonnaise, en 
passant par le repas régime 
(plus on est mince, plus on 
plaît...), oh oh...C’est une 
question vraiment facile, 
celle-là ! Evidemment, je ré¬ 
ponds ce que je n’oserais 
malheureusement jamais 
faire (en tous cas, pas en¬ 
core, hé hé), et je chuchote à 
l’intention de mon premier 
rendez-vous qui doit se de¬ 
mander dans quelle galère il 
s'est encore fourré 
« laisse-moi faire»... Le com¬ 
mentaire arrive, sympathi¬ 
que « Sussurez-le à 
l’oreille...», comme si je n’y 
avais pas pensé ! Les au¬ 
tres questions sont toutes 
du même style. Un brin d’hu¬ 
mour, un peu d'excentricité, 
quelquefois de l’impossible, 
mais, en général, assez réa¬ 
listes. On sent les longues 
années d’expérience de 
l’auteur, testée sur le ter¬ 
rain... 

Et, dernière question, la 
phrase fatidique : « Que dire 
pour le (ou la retenir chez 
vous cette nuit?» Le genre 
gros comme une chambre à 
coucher : « Tu peux dormir 
ici, y a de la place», lancé 
comme si de rien n’était. Ou 
le style allusif et gourmand : 
« J'ai des croissants et de¬ 
main c'est dimanche», qu’il 
faut accompagner d’un œil 
brillant et d'un sourire mys¬ 
térieux. Ou alors, en éclatant 


de rire, et vlan dans l’hyper 
naturel : « J'ai un canapé 
convertible, on ne sera pas 
trop de deux pour l’ouvrir !». 
Moi, j'ai répondu... Hé hé... 
J’appuie sur « suite» en flip¬ 
pant un max, gla gla gla... Je 
vais avoir droit à l'analyse de 
ma tactique de drague... Et 
ouf ! Je ne me sens plus, 
tralalala : 700 points, je viens 
de récolter ! Score quand 
même bien ambigu. A la li¬ 
mite entre le raisonnable et 
le super don juanisme ! 

Allez, encore une fois le test 
pour tout bien mémoriser, et 
lors de mon prochain ren¬ 
dez-vous, je loue une 
Aronde décapotable, on 
dîne dans un restau cool, et, 
ensuite, j’aurai le choix entre 
trois phrases toutes faites, 
moi qui ne PASS jamais 
quoi dire dans ces cas là... 


Chine Lanzmann 



POUR LA VIE 

Le micro-serveur parisien 
Futura, qui tourne sans con¬ 
naître d’interruptions ni de 
problèmes depuis déjà un 
an, offre courageusement, 
un abonnement à vie ! Car¬ 
rément longue durée... Pour 
150 F, vous devenez citoyen 
de Futura, ville du futur, ex¬ 
trêmement bien organisée : 
PTT (messagerie), champ de 
Basic, école, mairie, banque 
de logiciels, salle de jeux 
(notamment Caverne et 
Snake, les premiers jeux 
d'arcades télématiques), la 
galerie de peinture, le jour¬ 
nal, les halles et la salle des 
forums. 

Pour s’abonner, téléphoner 
au (16-1 45 00 30 15 et, puis¬ 
que vous n'avez pas encore 
de mot de passe, tapez 
« DEMO » pour « démons¬ 
tration ». La visite en vaut la 
peine ! 

MULTIPALIERS 

Télétel 3 s’étagera bientôt en 
multipaliers quant aux for¬ 
mes de tarifications. Selon 
l'intérêt qu'ils présentent, les 
services Kiosque varieront le 
prix de l’heure de con¬ 
nexion. Ouf ! Le soixante 
francs heure va baisser ! 
Pour faciliter les comptes, le 
coût de la communication 
apparaîtra sur l’écran du mi¬ 
nitel, comme sur un comp¬ 
teur de taxi. 


DE COMPORTEMENT 


a* serez-vous la nuit HEU !!! 

ensemble? 88 & *8 



Sur Rush, on se rue pour savoir ce qu 'Il faut faire ou ne pas faire, 
dire ou ne pas dire, pour décrocher un premier rendez-vous. 
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I NC 1AIR 


SŒUR ANNE, 
NENOS-TURIEN 

VENIR? 


L a société Sinclair Re¬ 
search ne sert pas les 
journalistes. En effet 
on annonce une nouvelle 
machine en avant première 
et trois mois après la ma¬ 
chine n'est toujours pas là. 
Le Spectrum 128 est en Es¬ 
pagne certes, mais la 
France et les Français ne 
satisferont pas leur curiosité 
avant quelques mois. Chez 
Sinclair France on ne sait 
pas, du moins on ne veut 
pas donner une date de 
commercialisation. Quant au 
QL 2, rares sont ceux qui 
n’en parlent pas. Pour ma 
part je ne l’ai pas vu et, si vé¬ 
ritable 16 bits (68000) il y a , 
il n’est que rumeurs et éphé¬ 
mères prototypes. 


CHEZ 

LE LIBRAIRE 


Commande vocale et robo¬ 
tique sur ZX Spectrum et 
ZX Spectrum plus 


MKKK DOOGUET 


commande 
vocale st robotique 
""ZX Spectrum 
"Spectrum Plus 



Construction d’un robot 
obéissant à la voix, qui émet 
des sons(parle?). Tel est le 
thème de cet ouvrage. Pour 
cela l’auteur définit un pseu- 
do langage qui tient à la fois 
du Logo et d’un langage 
d’intelligence artificielle. Ce 
livre s’adresse aux program¬ 
meurs qui veulent franchir le 
pas qui sépare informatique 
et robotique. 

P.Pouguet, Editions Eyrolles 

Le langage machine du ZX 
Spectrum 

Cet ouvrage est aussi vala¬ 
ble pour le successeur du 
Spectrum le ZX Spectrum 
Plus. Illustré par des exem¬ 
ples commentés, ce livre 
propose une approche du 
LM pour débutants sans 


CASSETTES, 

DISQUETTES 


QL sprites generator de Di¬ 
gital Précision 

Mettez des sprites dans vo¬ 
tre machine. Création et 
compilation de vos effets 
graphiques dans le but 
d’une intégration dans vos 
programmes. Intéressant : 
les droits de copyrights sont 
libres, tous les programmes 
utilisant les sprites créés 
avec ce logiciel sont 
exempts de droits. La nou¬ 
velle société française Pyra¬ 
mide commercialise une sé¬ 
rie de logiciels de jeux et de 
gestion pour QL. Ces logi¬ 
ciels sont disponibles chez 
Sinclair France. 



LE LANGAGE MACHINE 
DU ZX.SPECTRUM 


cedic nathan 


connaissances d’assem¬ 
bleur et une méthode prati¬ 
que de construction de rou¬ 
tines pour programmeurs 
plus expérimentés. Loin 
d’être une suite exhaustive 
des instructions du Z80, ce 
livre constitue un bon outil 
de travail. 

I. Stewart et R. Jones, Edi¬ 
tions Cedic Nathan 


BONNES 

FICELLES 


Des astuces pour QL 

Le QL ne possède pas d’ins¬ 
truction pour tester si une 


case de l’écran contient un 
caractère et le déterminer. 
Pour pallier cet inconvénient 
il suffit de créer trois procé¬ 
dures qui jouent le même 
rôle. Regardons-les en dé¬ 
tail. 

La procédure HOME doit 
être activée dès le début du 
programme afin de donner 
la bonne dimension (36, 19) 
sont celles de l’écran en 
mode télévision, il ne tient 
qu’à vous de les ajuster au 
mode moniteur ou à la taille 
de la fenêtre. 

La procédure LOCATE n’a 
d’autre but que d’inverser le 
AT en vue d’une impression. 
La procédure TPRINT est la 
clé de voûte de la simula¬ 
tion. En effet elle positionne 
le curseur aux coordonnées 
fournies par la procédure 
LOCATE, et met à jour la ma¬ 
trice associée à l’écran. Et 
bien sûr, ne l’oublions pas, 
elle imprime le caractère 
voulu. Tout caractère inscrit 
à l’écran sans cette routine 
n’est pas pris en compte 
dans le test de reconnais¬ 
sance. 

Pour connaître le caractère 
contenu dans une case pré¬ 
cise, il suffira de tester la 
matrice test (colonne, ligne). 


F,-O. Lelaidier 


10000 REMark --— 

10010 DEFine PROCedure tprint(a$) 

10020 REMark - 

10030 AT 1> c 

10040 lest(c? 1)-CODE(aT) -32 

10050 PRINT a*; 

10060 1=1+(1<19) 

10070 C=0 

100O0 END DEFin e t p rint 

10090 REMark --- 

10100 DEFine PROCedure locale(x>y) 

10110 REMark - 

10120 c=x: 1=y 

10130 END DEFine locale 

10140 REMark - 

10150 DEFine PROCe d ur e home 

10160 REMark - 

10170 CLS 

10180 DIM lest<36?19) 

10190 1=0:c=0 

10200 END DEFine home 
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VIDEOSHOP l’espace AMSTRAD 


AMSTRAD 
PCW 8256 


le plus micro ■ 

^ de Paris !... 

SSS&T 

' mens 400 F 

_ . .rûP 



vainqueur par K.O. 
chez les pros 


6990 F 






sur le hard : VIDEOSHOP vous offre un logiciel cadeau 
(choisir parmi les produits qui portent un astérisque), 


Produits 

Prix 

TTC 

(D 

Apport. 

compt. 

Mensua¬ 

lités 

TEG 

(2) 

Coût total 
du crédit 
avec assur. 

CPC 464 monochrome. 

2690 

480 

6 

24,30 

190 

CPC 464 couleur. 

3990 

769 

9 

24,30 

379 

CPC 664 monochrome. 

3790 

569 

9 

24,30 

379 

CPC 664 couleur. 

5290 

816 

13 

24,30 

726 

CPC 6128 monochrome. 

4490 

628 

11 

24.30 

538 

CPC 61,?8 couleur . 

5990 

909 

15 

23,80 

919 

PCW 8256 monochrome . 

6990 

1058 

18 

23,80 

1268 

Lecteur de disquettes . 

1990 

487 

4 

24.30 

97 

Imprimante DMP 2000 . 

2290 

430 

5 

24,30 

140 


UTILITAIRES 

Multiplan (D) . 499 F 

D Base II 8256 790 F 

Superpaint(D). 395 F 

Space Moving (C/D). 295/395 F 

Turbo Pascal (D). 740 F 

Datamat (D) 450 F 

Textomat (D) . 450 F 

Dams Assembleur (C/D) 295/395 F 

Autoformation Assembleur (C/D) ... 195/295 F 

BIBLIOGRAPHIE 

Le Basic de l’Amstrad (PSI) 120 F 

102 programmes CPC 464 (PSI) . 120 F 

Super jeux Amstrad (PSI) . 120 F 

Le livre du CPM (PSI) . 149 F 

Trucs et astuces (Micro-Appl.) . 149 F 

Programmes Basic (Micro-Appl.) . 129 F 

Basic au bout des doigts (id.) . 149 F 

Amstrad ouvre-toi (iu ) . 99 F 

Jeux d’aventure (id.) . 129 F 

Bible du programmeur (id.) . 249 F 

Langage machine (id.) . 129 F 

Graphismes et sons (id.) . 129 F 

Peekset Pokes (id.) . 99 F 

Livre du lecteur de disquettes 149 F 


PERIPHERIQUES 

Lecteur + contrôleur disq. 1990 F 

Lecteur disquettes. 1 590 F 

Imprimante DMP 2000. 2290 F 

Souris AMX 690 F 

Adaptateur péritel MP 2 (664). 490 F 

Lecteur K7 + câble (664-6128). 390 F 

Crayon optique (C/D). 290/350 F 

Synth. vocal français 

Technimusique. 490 F 

RS 232(C). 590 F 

2° Lecteur 8256.1 990 F 

JEUX 

Eden Blues (C/D) .140/220 F 

Fighter Pilot (C/D)'. 99/149 F 

Crafton et Xunk (C/D) . 140/220 F 

Sorcery Plus (C)‘. 95/185 F 

Amélie Minuit (C/D) *. 140/220 F 

Macadam Bumper (C/D) . 160/240 F 

Bataille pour Midway (C) . 140 F 

Bataille d'Angleterre (C/D) 140/220 F 

Mission Delta (C/D) . 120/195 F 

La Geste d’Artillac (C). 290 F 


Rallye II (C/D) . 160/265 

Empire (C/D)*. 195/265 

Meurtre à grande vitesse (C/D) . 160/229 

Football (C) . 120 

Way of Exploding Fist (C) . 120 

Bruce Lee (C/D)*. 120/195 

Tyrann(C)*. 185 

Bad Max (C) . 199 

3D Voice Chess (C/D). 160/199 F 

Solda Million (C/D) . 120/180 F 

Raid (C/D) . 129/195 F 

Mandragore (C/D) . 245/295 F 

Scrabble (C) . 250 F 

Match Point (C) . 125 F 


C Cassette 
D Disquette 


Q 


Offres valables sous réserve de stock disponible. 

(1) Prix au 1/01/86 sous réserve de baisses éventuelles 

(2) TEG : taux en vigueur au 1/11/85 


VIOEI ? 1SH0P 


l’espace AMSTRAD 
le plus micro de Paris 


Du lundi au samedi de 9 h 30 à 19 h. 

50, rue de Richelieu 75001 Paris - Tél. : (1) 42.96.93.95 - Mét. : Palais-Royal 
251, boulevard Raspail 75014 Paris - Tél. : (1) 43.21.54.45 - Mét. : Raspail 


-X- 


BON DECOMMANDE à adresser à VIDEOSHOP, 50, rue de Richelieu 75001 Paris 

Nom - □ Je vous adresse la commande suivante : 

Prénom _ 


Adresse _ 

Code Postal _ 
Téléphone _ 


Ville, 


□ Je désire recevoir une documentation sur : 



Joindre 3 timbres à 2,20 F pour frais d'envoi. 

□ Je possède un micro ordinateur : 


□ Je choisis la formule de règlement : □ Au comptant □ À crédit* 

□ Je vous joins mon règlement par : 

□ Chèque bancaire □ CCP □ Contre remboursement (100 F en sus). 

•(Joindre : photocopie carte d'identité, RIB, dernière fiche de paie, quittance EDF.) 
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0 GI CIE LS 

FAMILIAUX 


MULTI GESTION 

Salaire, consommation, épargne. 
Que reste-t-il dans notre panier? 


Pratique, rapide et utile, Multi Gestion 
présente de nombreux avantages : 
pas de retour perpétuel au menu, pas 
besoin d’entrer de dates, le début de la 
comptabilité ne se fait pas obligatoire¬ 
ment en janvier comme c’est souvent 
le cas dans ce type de logiciel. 

Machine : Amstrad 
Option : imprimante 
Editeur : CORE 
Auteur : Patrick Abad 
Prix : 195 F 

Ce logiciel existe aussi en version dis¬ 
quette, mais accompagné du logiciel 
CP Graph (290 F). 


Tableur équipé d’un calendrier perpé¬ 
tuel, Multi Gestion permet soit une te¬ 
nue de compte quotidienne, soit un 
récapitulatif mensuel sur l’année. La 
comptabilité autorise jusqu'à 18 pos¬ 
tes par jour à partager au choix en en¬ 
trées et sorties, auxquelles il est possi¬ 
ble par la suite de donner un nom. Les 
calculs, très rapides, se font automati¬ 
quement par ligne et par colonne, 
c’est-à-dire par poste et par jour. On 
obtient en fin de mois un résultat à 
comparer à ceux des mois précédents. 
Ce logiciel n’est accompagné d'aucun 
manuel, et pour cause : il serait inutile ! 
A n’importe quel moment, il suffit d'ap¬ 
puyer sur la touche A (comme aide) et 
une fenêtre vient se superposer à ce 
que l’écran affiche. Dans cette fenêtre, 
un manuel d’utilisation dont on tourne 
les pages avec les flèches de direc¬ 
tion. Ensuite la touche Q (comme quit¬ 
ter) et on retrouve l’écran exactement 
comme avant cet appel à l’aide. 


MM 



Des fenêtres d'aide en guise de manuel 

Les résultats obtenus peuvent être im¬ 
primés sans problème en 40 ou 80 co¬ 
lonnes. Le fichier, sauvegardé sur cas¬ 
sette puis rechargé, ne peut être 
réutilisé que si un mot de passe, intro¬ 
duit lors de sa création et occulté à 
l’écran, lui est donné. 


FOOTBALL 

Classements et résultats 
d'un championnat au crayon optique 

Il ne s'agit pas d’un jeu ni d’une martin¬ 
gale pour gagner au Loto sportif. Il 
s’agit d’un module permettant de gérer 
le déroulement d'une saison de cham¬ 
pionnat de football. 

installez le moniteur assez bas car, une 
fois les noms des équipes introduits, 
vous pouvez absolument tout faire au 
moyen du crayon optique. Comme il 
n’y a pas de manuel d’utilisation, on se 
perd un peu, au début, dans les méan¬ 
dres du programme. Mais après avoir 



Résultats d’une journée 

tourné trois fois dans les options, on 
s’y déplace aisément. Pour chaque 
journée du championnat, vous entrez 
les matchs, les résultats et leur locali¬ 
sation. A partir de là, pour chaque jour¬ 
née, vous avez tout de suite les diffé¬ 
rents classements avec le nombre de 
buts marqués ou encaissés, à l’exté¬ 
rieur ou non, etc. Seize options supplé¬ 
mentaires donnent des informations 
qui ne sont pas toujours fournies par 
les journaux : les victoires ou défaites 
consécutives, les meilleures défenses 
ou attaques, les équipes non encore 
rencontrées, etc. 

La sauvegarde sur cassette se fait à la 


sortie du programme et le chargement, 
lui, à partir de n’importe quelle autre 
option. 

Très facile à utiliser, Football présente 
cependant un inconvénient : il ne sau¬ 
vegarde pas l’intitulé de la saison con¬ 
sidérée. En clair, cela signifie que , si 
vous entrez en mémoire les résultats 
de la saison 84/85, il vous faudra l’ins- 



Tous les classements... 


crire sur la cassette de sauvegarde car 
rien par la suite ne vous indiquera à 
l’écran de quelle saison il s’agit. 
Machine : M0 5.T0 7-70 
Option : crayon optique 
Editeur : Micro Programmes 5 
Auteur : G. Affagard 
Prix : 140 F. 


MINIFILE 

Un fichier multi-usages 
à vos mesures 

Si l’on se réfère au nombre de pro¬ 
grammes de fichiers reçus par l’équipe 
du Cahier du logiciel , ce type de pro¬ 
gramme intéresse beaucoup de nos 
lecteurs. En voici un pour Amstrad. 
Facile et pratique à utiliser, il vous pro¬ 
pose de définir un certain nombre de 
critères. Vous entrez vos fiches en mé¬ 
moire. Rien de plus aisé alors que de 
les modifier, trier, afficher et imprimer. 
Un inconvénient (majeur) non indiqué 
par la notice (succincte) : si vous pro¬ 
posez plus de 10 champs à Minifile, il 
les acceptera sans protester et les gé¬ 
rera normalement... mais sauvegardez 
votre fichier, éteignez votre Amstrad 
puis tentez de relire votre fichier à par¬ 
tir de la cassette. Surprise désagréa¬ 
ble ! Tout se plante. Vous pouvez 
quand même utiliser ce programme. Il 
fonctionne parfaitement, à condition de 
ne pas dépasser les 10 champs 
fatidiques... 

Machine : Amstrad 
Option : imprimante 
Editeur : Artisoft 
Auteur : P. Feldstein 
Prix : 149 F 


Jean-Loup Renault 
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ENQUETE 

LECTEURS,QUI ÊTES-VOUS? 

Vous êtes près de 70 000 à acheter Micro V.O. chaque mois. Pour que notre revue 
réponde encore plus à vos préoccupations, aidez-nous à mieux vous connaître. 
Répondez à ce questionnaire et gagnez, si la chance est avec vous, un micro¬ 
ordinateur ou l’une des boîtes de disquettes (ou cassettes) que nous tirerons 

au sort. Merci de nous être fidèles. 


1 - Quel âge avez-vous? 


2-Sexe? M-F 

3 - Activité : 

lycéen, 

étudiant, 

profession (laquelle?). 

4 - Etes-vous abonné à Micro 
V.O .? 

Oui - Non 

5 - Depuis quel numéro lisez-vous 
Micro V.O.? 

6 - Etiez-vous lecteur de Micro 7? 

Oui - Non 

7 - Etiez-vous lecteur de Votre 
Ordinateur? 

Oui - Non 

8 - Lisez-vous d’autres revues 
d’informatique? 

Oui - Non 

9 - Si oui, lesquelles? 


10 - Lisez-vous d’autres journaux 
non informatiques? 

Oui - Non 

11 - Si oui, lesquels? 


12 - Quel est votre niveau en 
informatique : 

Débutant : 

Initié : 

Confirmé : 


13 - Possédez-vous un micro-or 
dinateur? 

Oui - Non 


14 - Si oui, lequel ? 

Amstrad, Apple, Atari, Commodore, 
IBM PC ou compatible, MSX, Oric, Sin¬ 
clair, Thomson. 

15 - Autre? 

Précisez : 


16 - Quels périphériques utilisez- 
vous? 


17 - A quoi utilisez-vous votre 
machine : 

- Initiation 

- Programmation 

- Jeux 

-Traitement de texte 

- Applications familiales 
(gestion budget, comptabilité, 
agenda, etc.) Précisez : 


- Applications professionnelles 
Précisez : 


18 - Utilisez-vous un micro-ordi¬ 
nateur dans le cadre de votre 
activité : 

- scolaire 

- études 

- professionnelle 

19 - Quel budget consacrez-vous 
à votre équipement informatique 

(ordre de prix)? 


20 - A quoi consacrerez-vous 
l’essentiel de ce budget en 86 ? 

- Achat d’une nouvelle machine 

- Achat de softs 

- Achat de périphériques 


21 - Combien de personnes lisent 
votre numéro de Micro V.O. ? 


22 - Citez les 3 rubriques que 
vous préférez dans Micro V.O. 


23 - Y a-t-il une ou des rubriques 
que vous n’aimez pas ? 


24 - Pensez-vous que Micro V.O. 
soit : 

- trop technique 

- assez technique 

- pas assez technique 

25 - Quelles autres rubriques ou 
articles souhaiteriez-vous voir 
dans Micro V.O. ? 


26 - Vos commentaires sur la 
revue. 


27 - Nom et adresse (facultatifs, 
mais nécessaires si vous désirez 
participer à notre tirage au sort). 


Renvoyez votre bulletin à Micro 

V.O., 120, avenue Charles de 
Gaulle, 92522 Neuilly Cedex 
(attention, nouvelle adresse). 
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Les enfants de ta « minithèque » du CESTA ont laissé tomber 
leurs crayons, pinceaux, ciseaux, colle et autres ustensiles 
classiques pour réaliser leur première bande dessinée sur 
ordinateur. Cela ne les a nullement impressionnés, l'imagination 
était toujours là. 
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L’ordinateur fait maintenant partie 
de « L’innocent paradis, plein de plaisirs 
furtifs » de certains tout petits. Ce jouet 
leur inculque les principes informatiques 
sans qu’ils le 
sachent... Une 
expérience 
pédagogique 
du CESTA. 


DE CRECHE.' 


I l était une fois un robot qui voulait 
une peau pour cacher ses circuits. 
C’est vrai cela ! a-t-on jamais vu 
un humain exhiber ses entrailles ? 
D’ailleurs le robot voulait ressembler 
aux hommes, leur ressembler pour ne 
plus leur obéir. Alors, un jour... Les au¬ 
teurs de cette fable digne de la Fon¬ 
taine - en un peu plus mouvementée 
peut-être - ont entre trois ans et demi 
et cinq ans et demi. Bon, jusque là rien 
d’extraordinaire : faire inventer des 
contes par de jeunes enfants n’est pas 
nouveau, tous les enseignants de ma¬ 
ternelle vous le diront. Seulement ici, 
on n’a pas lésiné sur les moyens : 
toute l’histoire transcrite en bande des¬ 
sinée a été élaborée sur des micro-or¬ 
dinateurs ; elle sera très prochaine¬ 
ment visible sur kiosque minitel. 

« J’ai été impressionnée par la rapidité 
incroyable avec laquelle les enfants 
apprennent à manipuler l’ordinateur. 
Les universitaires avec qui je travaille 
d'habitude font figure de lambins en 
comparaison ! » Anne-Françoise Tes¬ 
ter dirige un projet de réseau télémati¬ 
que international consacré à la péda¬ 
gogie, au sein du CESTA (Centre 
d’étude des systèmes et technologies 
avancées). Elle avait depuis longtemps 
envie de tenter une expérience tournée 
vers les tout petits. L’occasion s’est 
présentée lorsque le personnel du 
CESTA a réclamé une garderie pour sa 
progéniture : la « minithèque » a alors 
vu le jour. Pendant deux heures, cha¬ 
que mercredi, ce centre met à la dispo¬ 
sition des moins de six ans, des micro¬ 
ordinateurs (Apple, BBC Micro, Sin¬ 
clair, Spectrum, Commodore 64, T07), 
une imprimante, des logiciels de jeux 
éducatifs... Une sorte de jardin d’en¬ 


fants électronique. La minithèque reçoit 
aujourd’hui les petits de la maison d’en 
face : le ministère de la Recherche. 
Comme quoi, le dicton selon lequel le 
cordonnier est toujours le plus mal 
chaussé, n’est qu’une cynique plaisan¬ 
terie... 

Anne-Françoise Tester et son équipe - 
un psychologue, une institutrice et un 
animateur formé à la télématique - se 
défendent de jouer les apprentis sor¬ 
ciers. « Il ne s'agit pas d'imposer l’in¬ 
formatique aux bébés. Mais les nou¬ 
velles technologies font désormais 
partie de notre environnement. Ce 
n'est plus la peine d’essayer de les re¬ 
jeter : elles sont partout. A la minithè¬ 
que, les machines sont là pour être 
apprivoisées. Les petits jouent, créent 
avec elles. Ils apprennent à les utiliser 
au même titre que n'importe quel outil, 
comme un crayon ou une paire de ci¬ 
seaux. » Anne-Françoise Tester rêvait 
d’ailleurs d’un véritable jardin avec des 
pelouses, des poissons, afin que l’or¬ 
dinateur ne constitue pas le seul pôle 
d’intérêt. Malheureusement, ce paradis 
enfantin n’a pu exister faute de 
moyens. «Au début, nous voulions 
réaliser cette expérience dans une 
école maternelle du quartier, introduire 
l’ordinateur dans un contexte quoti¬ 
dien. Mais l’Education nationale ne 
s’est pas montrée très chaude ». 

Les réactions des bambins face à 
l’écran et au clavier ont surpris tout le 
monde. En un tour de main, ils ont ap¬ 
pris à démarrer un programme, choisir 
un menu, imprimer une image... « La 
peur de mal faire, d'appuyer sur le 
mauvais bouton appartient aux adul¬ 
tes, pas aux enfants ». Il est vrai qu’ils 
ne se préoccupent généralement pas 


plus du coût d’une réparation que de 
leur première couche-culotte ! De 
toute façon, à l’âge de trois ans, rien ne 
prouve qu’un ordinateur soit plus éton¬ 
nant qu’un poste de télévision, un ap¬ 
pareil-photo ou une cafetière électri¬ 
que. Malgré tout, le but avoué de 
l’équipe du CESTA est bel et bien l’ap¬ 
prentissage inconscient des principes 
informatiques. Conserver un dessin 
sur une disquette et le modifier la 
séance suivante apparaît immédiate¬ 
ment comme tout à fait naturel au ga¬ 
min moyen. En revanche, voir son œu¬ 
vre transférée sur le micro du voisin 
semble parfaitement saugrenu, surtout 
si ce dessin est resté affiché en mé¬ 
moire vive sur son propre écran. 
N’empêche, pour les petits comme 
pour les animateurs, ces quelques 
questions techniques restent très se¬ 
condaires face aux vrais problèmes : 
comment accepter de céder « sa » 
place aux copains devant « son » 
écran et admettre qu’il est interdit 
d’emporter « son joujou » le soir à la 
maison ! 

La minithèque vient de fêter son pre¬ 
mier anniversaire en janvier. L’histoire 
du robot est aujourd’hui terminée. Et, 
même si dans cette aventure la fin ap¬ 
paraît moins importante que les 
moyens, j’ai tout de même envie de la 
raconter : après moult et moult péripé¬ 
ties, le robot finit par trouver une peau 
et, du coup, par se transformer en 
homme. Depuis ce jour, le mutant ne 
voulut plus jamais entendre parler de 
manettes, de touches ni de boutons. 
D’informatique en quelque sorte. 

CESTA : 46 34 33 86 


Martine Vato 
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AVOIR 


■ AXI PEDAGOGIE, 


MINI PROGRAMMATION 


Des logiciels pour créer des applications pédagogiques sans 
s’embrouiller dans les contraintes de la programmation. 
Messieurs les profs, à vous de jouer ! 


F aisons les présentations : le sys¬ 
tème-auteur est un outil d'ensei¬ 
gnement assisté par ordinateur 
parce qu’il a l’ambition de vous aider à 
créer vos propres logiciels. C’est un 
programme complexe qui se charge 
de tout ce.qui vous pèse, des contrain¬ 
tes informatiques. Il donne la clé des 
champs à votre passion : la pédago¬ 
gie, cet art du comment-faire-savoir. 
Délesté des soucis pratiques, l'ensei¬ 
gnant peut se livrer à une seule ré¬ 
flexion : la meilleure stratégie pour faci¬ 
liter l'apprentissage de l’élève, quelle 
que soit la matière. 

Les systèmes-auteur, malgré leur di¬ 
versité, procèdent de la même façon. 
Ils proposent à l’auteur : 

• La création des items. La réalisation 
d’un didacticiel est méthodique. Il 
s’agit de décomposer l’apprentissage 
en unités distinctes de texte. On pro¬ 
cède par affichages successifs de 
« pages- écran» proposant des infor¬ 
mations, des questions, des commen¬ 
taires. Ces unités s'appellent des 
items. Il faut donc taper les textes et 
assurer leur mise en page. Le sys¬ 
tème-auteur facilite cette tâche grâce à 
un éditeur plein écran (modification à 
volonté du texte, variété de mise en 
page : inversion vidéo, soulignement, 
encadrement, clignotement, couleurs). 
Dans certains cas, un éditeur graphi¬ 
que permet d’insérer des dessins. 

• L’analyse des réponses de l’utilisa¬ 
teur. C’est véritablement le cœur du 
système, son élément caractéristique. 
Contrairement à la plupart des logi¬ 
ciels éducatifs, il accepte des répon¬ 
ses complexes et aléatoires. Bîen plus, 
il est fait pour ce dialogue. La longueur 
autorisée varie suivant la puissance du 
système, entre 78 et 240 caractères, et 
constitue un élément important de son 
appréciation. Le logiciel devient « intel¬ 
ligent»... Il joue le rôle de l’enseignant, 
reconnaît la bonne réponse parmi les 


mauvaises et en tient compte pour la 
suite. Par exemple, il proposera un 
commentaire et un cheminement ap¬ 
propriés à l’erreur détectée. L'interacti¬ 
vité est faite de cette adaptation per¬ 
manente. Mais cette simulation de 
cours n'est possible que si l’auteur 
prête d'abord sa matière grise. Son in¬ 
tervention est capitale à deux niveaux. 
Il doit prévoir les modèles de répon¬ 
ses : justes, fausses ou plus ou moins 
justes, auxquels seront comparées 
celles de l’élève. 

Attention, réflexion ! Cette étape rigou¬ 
reuse implique le respect de certains 
codes ou d’une « grammaire» spécifi¬ 
que. Qu’on se rassure! Le propre du 
système est de vous faciliter la tâche. 
Mais sa performance par rapport à un 
autre dépend beaucoup de sa capaci¬ 
té d’analyse... L’auteur doit également 
prévoir les branchements successifs 
qui correspondent, d’item en item, au 
déroulement de l'apprentissage en 
fonction des résultats. 

Une terrible 
incitation 
à la création 

Deux aspects majeurs déterminent 
donc la qualité d’un système et son 
évaluation par rapport à d’autres : la 
gestion de l’écran (facilité de mise en 
page, etc.) plus ou moins souple et 
performante, l'analyseur de réponses, 
plus ou moins riche et précis. 

Euridis (Hachette informatique - dis¬ 
quette Nanoréseau - T07- 70, M05) 
Dernier-né des systèmes-auteur (les 
fées se sont longtemps penchées sur 
son berceau), fort de l’expérience de 
ses aînés, Euridis fait figure de battant. 
Très complet, il relève d’une prouesse 
technique en tirant le meilleur parti du 
support que le sort (alias Plan informa¬ 


tique) lui avait désigné : le M05. Il 
pousse à son plus haut degré l'exi¬ 
gence d'interactivité qui représente 
une visée essentielle de l'E.A.O. et des 
systèmes-auteur. Plus qu’un autre, il 
gère pour l'auteur les modalités de la 
création et offre un choix étendu d’op¬ 
tions. L’esprit de dialogue inspire les 
temps forts de sa manipulation. 

Le système prend en charge l’auteur 
dans plusieurs cas. Il applique auto¬ 
matiquement certains choix pédagogi¬ 
ques au cours du dialogue avec 
l'élève : accord en fonction du sexe, 
vouvoiement ou tutoiement, etc. Il si¬ 
mule ainsi au plus vrai une situation 
d’échange. Par ailleurs, il mémorise, si 
l'auteur le souhaite, les réponses et les 
cheminements de l'élève pour un bilan 
individuel ou comparatif. 

Avec rapidité on obtient des mises en 
page personnalisées par la détermina¬ 
tion de fenêtres (15 par écran) utilisa¬ 
bles simultanément ainsi que le di¬ 
mensionnement de zones de travail 
pour la saisie des textes d'items (mo¬ 
dification immédiate de l’alignement 
suivant le format). Le clavier ou le 
crayon optique réagissent vite : un vrai 
conte de fée. Votre caprice d’auteur, 
sous la baguette optique, est instanta¬ 
nément exaucé. Voir son logiciel en 
peinture est, avec Euridis, un jeu d’en¬ 
fant. Seize couleurs agrémenteront vos 
textes et vos dessins. Car ce système 
s'est allié un éditeur graphique remar¬ 
quable. L’écran, métamorphosé en 
« table à dessin», et le crayon optique 
en pinceau reproduiront les formes les 
plus fantasques, avec la précision du 
point par point sur tout l’écran. La 
loupe permet d’y voir plus clair. Des 
pictogrammes symbolisent les multi¬ 
ples fonctions de votre nouvelle boîte à 
peintures : déplacer les formes, les 
multiplier, les colorer, les gommer, etc. 
Bien entendu, vos chefs- d’œuvre ne 
sont pas en péril. On les stocke et on 
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« Eurldls» (cl-contre) et 
« Evalua tor » (cl-dessous) 
sont deux systèmes-auteurs. 
Des outils qui facilitent le 
travail de l’enseignant dans sa 
recherche d’une pédagogie de 
qualité, adaptée aux 
différentes disciplines. 




Ls. QLjestion 
( Ci m P ■ O ■ c ■ ) 

Ls Question 
( en . r . o . c . ) 

LORS DE LA DEGUSTATION D'UN METS. QUELS 

SONT LES SENS QUI SONT SOLLICITES ? 

VOTRE REPONSE EST EXACTE 

LES TROIS SENS SOLLICITES EN CETTE OCCU- 
-RENCE SONT I LE GOUT, L'ODORAT, LA VUE. 




les insère dans le logiciel comme une 
simple page de texte. C’est une terrible 
incitation à la création. 

Le cœur du système fonctionne 
comme ailleurs, mais ses capacités 
sont supérieures. Il peut traiter jusqu’à 
240 caractères, blancs exclus, en utili¬ 
sant une «grammaire» simple mais 
performante, à base d’opérateurs logi¬ 
ques et de jockers et tient compte des 
incertitudes orthographiques, tout fa¬ 
vorise donc un dialogue pédagogique 
réel... avec la machine. Autre pôle at¬ 
tractif : Euridis propose une gamme 
étendue de commentaires qui enri¬ 
chissent l’interactivité et ponctuent les 
phases de l’apprentissage ^ commen¬ 
taires-échos, aides, sorties'de boucle, 
imprévus. 

Enfin, à toutes ces ressources s’ajoute, 
entre autres, le pilotage de diapositi¬ 
ves ou de vidéo-disque. La vente de ce 
logiciel pour nano- machine fera, sans 
aucun doute, date. 

Evaluator(Eduvision, pourT07-70) 
Conçu par un médecin pour faciliter 
les contrôles de connaissances es¬ 
sentielles dans sa discipline, Evaluator 
a une ambition : être plus qu'un simple 
Q.C.M. (questionnaire à choix multi¬ 


ples). Il adopte quelques fonctions du 
système-auteur qui étoffent le tac- 
au-tac un peu sec des questions-ré¬ 
ponses. Un texte préliminaire (1 800 
caractères maximum) permet de définir 
le sujet à l’étude, des rappels de no¬ 
tions complètent la démarche. Le 
Q.C.R.O.C. (questionnaire à réponses 
ouvertes et courtes) analyse les répon¬ 
ses ouvertes. 

Pas de hasard 
pour une 
bonne réponse 

Deux temps donc à ce logiciel : le 
Q.C.M. et le Q.R.O.C. Le premier ajoute 
au Q.C.M. à choix simple (1 question 
admet 1 réponse justes parmi n faus¬ 
ses) une autre possibilité : le choix li¬ 
bre où plusieurs réponses justes peu¬ 
vent être associées à une question. Il 
permet aussi une hiérarchisation des 
réponses : justes, fausses ou indiffé¬ 
rentes, à quoi s'ajoutent commentaire 
et recours explicatif pour tout ou partie 
des réponses. Le Q.R.O.C., quant à lui, 
admet des réponses ouvertes (cha¬ 
cune 80 caractères au plus). Le dialo¬ 
gue est donc plus complexe que dans 
un simple Q.C.M.. Cette démarche ex¬ 


clut le hasard de la bonne réponse. La 
contribution de l’auteur est plus 
grande : il doit établir une grille d’ana¬ 
lyse prévoyant les réponses accepta¬ 
bles en utilisant une «grammaire» 
précise. Les réponses tapées sont en 
quelque sorte filtrées. Là encore, com¬ 
mentaire et recours explicatifs sont 
possibles. 

Dans ces deux options, Evaluator, 
comme son nom l’indique, propose un 
suivi de l’élève sur imprimante : pas à 
pas il suit son cheminement, réponses 
comprises (à concurrence de 1 500 ca¬ 
ractères) et les résultats. Voilà pour 
l'enseignant ! Il permet à l’élève ci’ac- 
céder facilement aux réponses atten¬ 
dues, choix plausible dans une opti¬ 
que d’auto-apprentissage, mais choix 
discutable pour une réelle évaluation. 
En outre, Evaluator pilote un carrousel 
de diapositives. Les questions pour¬ 
ront ainsi porter sur du texte ou sur 
une image au gré de l’auteur. 


Catherine Perrot 


Le mois prochain, ta suite de notre 
présentation des systèmes-auteurs avec 
«Auteur » (Techniform) et«Pen » (Vifi- 
Nathan). 
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AVOIR 


TELEMATIQUE POUR TOUS 

L’AUTRE PLAN 


I maginez que l’on ramène à 
l’échelle d’une année toute l’his¬ 
toire de l’évolution technologique, 
depuis nos ancêtres, au front bas, vê¬ 
tus de peau de bêtes, jusqu'aux frin¬ 
gants scientifiques d’aujourd’hui. Voilà 
ce que cela donne : si le premier jan¬ 
vier apparaît l’outil de silex, il faut 
attendre jusqu’au 15 octobre pour que 
l’homme découvre le feu ; jusqu'au 31 
décembre à 22 h 30 pour la machine à 
vapeur, à 23 h 35 le même jour l'éner¬ 
gie nucléaire est libérée, précédant la 
micro-électronique de quelques se¬ 
condes*. C’est fou comme tout s’accé¬ 
lère ! Tenez, le développement de l'in¬ 
formatique par exemple : en 1947 le 
transistor est mis au point, en 59 le cir¬ 
cuit intégré, en 72 le microprocesseur. 
Et cela continue à l'école ! En 1970, 58 
lycées se dotent d’un mini-ordinateur, 
120 000 micro-ordinateurs sont distri¬ 
bués à la rentrée 86, janvier 86, 
300 établissements s’équipent en télé¬ 
matique ! A peine les micro-ordina¬ 
teurs branchés, voilà les micro-ser¬ 
veurs qui débarquent! Chaud devant! 
Même les institutions sont passées 
pour l'occasion à la vitesse supérieure, 
quelques mois ont suffi pour que la 
Délégation aux formations nouvelles 
choisisse les systèmes, les fournis¬ 
seurs et les bénéficiaires et dépense 
56 millions de francs. 

Depuis le temps que l'école parlait 
d'ouvrir ses portes, cette fois, le tour¬ 
nant est pris. La première idée était 
bien de transformer en terminaux les 
micro-ordinateurs déjà en place, grâce 
à un modem à numérotation automati¬ 
que. Las ! le syndrome de la facture 
P.T.T. a encore frappé ! On s'est donc 
contenté de micro-serveurs 16 bits ca¬ 
pables de gérer 4 à 8 lignes téléphoni¬ 
ques, qui diffuseront de l’information 
aux possesseurs de minitel du quar¬ 
tier. Mais ils ne pourront pas « appe¬ 
ler» l’extérieur. Cependant quelques 
écoles et collèges isolés échappent à 
la règle : ils recevront quelques centai¬ 
nes de cartes télétex. 

Pour les associations locales, l’heure 
de se faire entendre est venue : la ges¬ 
tion et l’animation des serveurs leur re¬ 
viennent. Reste à savoir ce qu’elles 
vont proposer. A terme, les voisins re¬ 
cevront peut-être sur leur minitel des 
articles rédigés par les élèves, des 
conseils en matière d’orientation sco¬ 
laire, ou le bulletin municipal... Tout dé¬ 
pendra de l’inspiration et du dyna- 
* R. Leguen, « Les enjeux du progrès ». 


misme des équipes. A priori, les grou¬ 
pements de parents d'élèves, les 
centres X 2 000, les clubs de jeunes, la 
Fédération des œuvres laïques, la Li¬ 
gue de l'enseignement, les Centres 
régionaux de documentation pédago¬ 
gique et les Centres d’information 
et d'orientation se montrent enthou¬ 
siastes. 

Le Ministère a élu 300 établissements 
volontaires pour accueillir un micro¬ 
serveur. Par ailleurs chaque académie 
se voit gratifiée d'un serveur plus im¬ 
portant. Autres élus : Bull, Goupil, Al- 
scom se partagent ce marché tout 
neuf. L’Education nationale leur a de¬ 
mandé un service complet : formation 
minimale au maniement du matériel 
sur le terrain - d'une journée à une se¬ 
maine pour les installations importan¬ 
tes - et contrat de maintenance d’une 
année. Ce nouveau réseau scolaire, 
doublé de l’étonnante popularité du 
minitel, devrait permettre de dévelop¬ 
per des programmes et des applica¬ 
tions télématiques tricolores suscepti¬ 
bles d'allécher l'étranger. 

Il faut se souvenir que le plan Informati¬ 
que pour tous ne vise pas uniquement 
les enfants. Le grand public est aussi 
dans le collimateur du raz-de-marée 
des nouvelles technologies, et quoi de 
mieux pour l’atteindre que d'aller le dé¬ 
nicher chez lui, via la télé communica¬ 
tion? Selon la D.F.N., le moment sem¬ 
ble judicieux : les micro-serveurs se 
révèlent aujourd’hui fiables, simples et 
pas trop coûteux. En télématique aussi 



tout s’accélère : on est passé très vite 
des gros serveurs à quelques centai¬ 
nes de francs l’heure d’utilisation à ces 
micro-serveurs d'une portée très lo¬ 
cale. On tombe à quelques petits 
francs. A ce prix-là, on espère bien que 
les parents laisseront leurs rejetons 
s'en servir. 

C’est probable, à condition que le 
menu leur plaise. Les équipes char¬ 
gées de « nourrir» le distributeur d’in¬ 
formations vont devoir apprendre rapi¬ 
dement les principes de l'édition et du 
journalisme. 


Martine Valo 


Les pantoufles 
après l’I.U.T 

Ç a bouchonne à l’entrée des IUT 
(Instituts universitaires de tech¬ 
nologie) d’informatique. Mais 
une fois passé le portillon d’accès, 
c’est la voie royale. Pas d’échec ou 
presque au DUT (Diplôme universitaire 
de technologie), et surtout l’assurance 
de dénicher un job dans les mois qui 
suivent la fin de leurs deux ans 
d’étude. Jean-François Bellegarde, di¬ 
recteur de l’I.U.T de Bordeaux, s’est in¬ 
quiété du devenir de ses anciens élè¬ 
ves sortis depuis 1973 de son établis¬ 
sement. Ils ont entre vingt-trois et 
trente-deux ans et semblent plutôt sa¬ 
tisfaits de leur sort. Les techniciens de 
l’informatique se montrent en fait très 
pantouflards : un tiers d’entre eux dé¬ 
crochent leur job à l’issue du stage en 
entreprise de fin d’étude et la moitié 
n'ont pas bougé de leur premier em¬ 
ploi. Pour 60% des anciens élèves, le 
DUT (Bac -F 2 ans) semble un niveau 
de formation suffisant alors que, si¬ 
gnale Jean-François Bellegarde, « En 
France, nous avons besoin d'ingé¬ 
nieurs ». Trop peu nombreux sont ceux 
qui s’orientent vers une maîtrise ou 
décrochent un diplôme d'ingénieur. 
On retrouve donc la plupart des 
« déutiens », comme on les appelle, 
aux postes d’analyste-programmeur 
(42%), programmeurs (25%) ou ana¬ 
lystes. Cadres lorsqu’ils travaillent en 
PME (66%) ou simples employés dans 
les grandes entreprises. Leurs salaires 
tournent autour de 78 000 F (données 
84). Certains, plus rares, plafonnent à 
150 000 F. 

Bienheureux les techniciens en infor¬ 
matique ? « Plus pour très longtemps, 
avertit Jean-François Bellegarde, le 
marché et les salaires se resserrent. Le 
chômage guette. » D’où, selon lui, la 
nécessité d'allonger le cycle d'études 
des 29 IUT d’informatique de France à 
trois ans. 


Pascale Nivelle 
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FAITES LE TEST MICROPRO ! 

...PAR LES CRÉATEURS DE WORDSTAR ® 


Vous cherchez un traitement de texte ? 

Faites le test MicroPro ! 

Avec plus d’un million d’utilisateurs, nous n’avons pas peur des comparaisons. 
L’atout majeur de notre gamme est l’alliance de la simplicité et de la puissance. 

Quel que soit votre besoin, 
vous trouverez parmi nos logiciels 
celui qui s’adapte le mieux à votre configuration. 



Pocket 1 

Easy 2 

Pro 2 

2000 2 

Autres* 

Menus sur demande 

/ 

/ 

/ 

/ 


Aide à l’écran 


✓ 

/ 

✓ 


Commandes mnémoniques 


/ 


/ 


Restitution de texte effacé 


/ 


/ 


Remise en forme de texte 

/ 

/ 

✓ 

/ 


Déplacement, copie, effacement de 
texte en colonnes 



/ 

/ 


Impression/Saisie simultanées 

/ 


/ 

✓ 


Impression proportionnelle 


/ 


/ 


Recherche/Remplacement de texte 

/ 

/ 

/ 

✓ 


Repagination automatique 

/ 

/ 

/ 

/ 


Correcteur orthographique 



/ 3 

/ 


Fusion de fichiers, courrier 
automatique (mailing) 

/ 


/ 

/ 


Fenêtres, formats, listes 
d’abréviations, notes de renvoi 




✓ 


Calcul 



✓ 

/ 


Tri 




✓ 


Gestion de tables de matières et d’index 



/ 



Mode machine à écrire 




/ 


Logiciels d’auto-formation 



✓ 

/ 


Imprimantes pré-installées 

15 

120 

25 

180 


Réseaux 




/ 


PRIX F.F./H.T. 

890 TTC 

1695 

3700 

5850 



1 CP/M80 - Amstrad - Commodore 128 - Apple Ile * Remplissez la colonne de droite 

2 IBM-PC et compatibles avec le traitement de texte auquel 

3 En anglais. vous voudrez bien nous comparer. 

CPM est une marque déposée de Digital Research Corporation. 

IBM est une marque déposée d’IBM Corporation. 



Si vous souhaitez aller plus vite, 
téléphonez-nous ou écrivez-nous... 
Nous connaissons déjà le résultat. 



MicroPro 


18, place de la Seine 
Silic 194 

94363 Rungis Cedex 
Tél. : (1) 46.87.32.57 






































AMSTRAD 


E2 


Lecteur disquette^ 
AMSTRAD 

DD1 



2-49<r 

1.990 F 


avec interface Livré Complet 
avec CP/M 

2 2 et 
Dr logo 
interface et 
câbles 

3 pouces 


A CREDIT tio „ : 

190 f 

comptant ho*of 

+ 223,40 F 

en 9 mensualités 


LECTEUR DISQUETTE 
FD1, 



ADAPTATEUR COULEUR PÊRITEL 

- MPI pour CPC 464 390 F 

- MP2 pour CPC 664/6128 4 90 F 



sans interface 2 e lecteur 
de disquette - Se branche 
sur le câble du DD1 



DISQUETTE 

AMSTRAD 

35f 

l'unité 

AUTRES 

MARQUES 

45 à 59F 



BOITIER RANGEMENT 

40 disquettes 3’ 150 F 


Jostick 

AMSTRAD 

155 F 

Avec prise poi 
brancher une 


CRAYON OPTIQUE - CPC 310 F 
pour couleur uniquement 


LN 


SYNTHE VOCAL STEREO 410 F 

SYNTHE VOCAL FRANÇAIS 
- En cassette 390 F 

-En disquette 490 F 


Lecteur de cassette pour 
AMSTRAD CPC 664 
CPC 6128 

390 F 



Jostick 
seul 140 





SOURIS AMX POUR CPC 

Fournie avec 4 logiciels 690 F 


JOYSTICK 220 F 

Compétition PRO 


HYPER-CB 

Communication 

183 rue Saint-Charles 
75015 Paris 
16 (1) 45.54.39.76 

Métro Place Balard 

ouvert du lundi au samedi de 9 h 30 à 19 h 30 


AMSTRAD cpc 


6128 



4.490f 

Avec moniteur 
noir et blanc 
+ câbles Complet 

A CREDIT 

390 F gwyy 

comptant oèo.i Von, 

+ 392.60 F ' 

en 12 

mensualités 


5.990f 

Avec moniteur 
couleur 

+ câbles Complet 

A CREDIT 

590 F SiïoT 

C*««1 ♦ OIM 

comptant ht».»' 

+ 517 F 
en 12 

mensualités 


AMSIRA 

Dcpc 4 

2.690 f 

Avec moniteur 
noir et blanc 
+ câbles Complet 

A CREDIT 

290 F TEG 2435% 

. . Coût total 

comptant t DIM 

230 F 360 r 

en 12 

mensualités 

3.990f 

Avec moniteur 
couleur 

+ câbles Complet 

A CREDIT 

_ _ _ _ IEG 3* 35 \ 

390 F Coût tolai 

comptant f - D ' M 

+|345.10 1- 

en 12 

mensualités 



AMSTRAD DMP 2000 



2.290 


A CREDIT 
290 F 
Comptant 

+ 246,90 F 
en 9 mensualités 


TEG 22.90% 
Coût total 
crédit + DIM 
222,10 F 


OKIMATE 20 

COULEUR 




IMPRIMANTE SMITH-CORONA 

Otov&° 



D 100-130 CPS 

2 990 F 

D 200-160 CPS 

3.990 F 


IMPRIMANTE CENTRONICS 

1.950 F 


A CREDIT 

290 F c..,,.,., 

comptant K,*,"’. 0 "’ 
+ 259.60 F 
en 12 mensualités 


2990 



NOUVEAU POUR PCW 8256 

- Comptabilité Logicys 1.380 F 

- Gestion de fichier - Act. 1 680 F 

fiches avec 10 zones dont 8 paramétrables 4- lignes 
complémentaires libres pour renseignements, 
pouvant être liés à un agenda + calculatrice - Tri 
muiticritères. 


EN STOCK DISPONIBLE IMMEDIATEMENT 


INTERFACE SYNMIDI 1.490 F 

Connexion sur synthétiseur 
livré avec cassette et disquette 


LIBRAIRIE INFORMATIQUE 


| MICRO APPLICATION | 

-AMSTRAD OUVRE TOI. 99 

-RASIC AUX BOUT DES DOIGTS. 149 

-BIBLE CPC 664/61 CB. 199 

-BIBLE DU CPC 464 (300 PAGES).. 249 

-DEBUTER AVEC CPC 6128. 99 

-GRAPHISME ET SON DU CPC 464... 129 

-IDEES POUR LE CPC. 129 

-JEUX AVENTURES:PROGRAMMES. 129 

-LANGAGE MACHINE DU CPC. 129 

-LIVRE DU LECTEUR DISK DD1. 149 

-MAITRISE DU CPC. 149 

-MAITRISER LE CP/M AMSTRAD. 149 

-MONTAGE.EXTENSION.PERIPH. 199 

-NOUVEAUX TRUCS ET ASTUCES. 129 

-PEEKS ET POLES DU CPC. 99 

-PROGRAMMES BASIC. 129 

-ROUTINES UTILES/AMSTRAD CPC...NC 
-TRUCS ET ASTUCES. 149 

I SYBEX I 

-AMSTRAD CP/M 2.2. 128 

-AMSTRAD EXPLORE. 98 

-AMSTRAD-1er s PROGRAMMES. 98 

-AMSTRAD-56 PROGRAMMES. 78 

-GUIDE DU GRAPHISME. 98 

-JEUX D’ACTION. 49 

-PROGRAMMES EN ASSEMBLEUR. 


■NOUVEAU 1 


Multiplan 
pour Amstrad 
CPC 6128 et 
PCW 8256 499 F 


ANIMAL. VEGETAL. MINERAL. 99 F 

-ARDOISE MAGIQUE. 99 F 

-Al TRAPE-MOTS. 99 F 

-LUURSE A LA BOUSSOLE. 99 F 

-6EOGRAF mi. 99 F 

-HORLOGER 1. 99 F 

-HORLOGER 2. 99 F 

-LETTRES MAGIOUES. 99 F 

-LOGIFORMES.120 F 

-LOGI PHRASES.120 F 

-NOMBRES MAGIQUES. .. 99 F 

-FENDU. 99 F 

-PLANETE BASE.140 F 

I PROGRAMMES COBRA I 

CASSETTES 

-HISTO-OUI l .120 F 

MEMORAM (ORTHOGRAPHE)..120 F 

2- AMSTERM (PLURIELS).120 F 

7- NOMBRES (+0100).120 F 

MATHASARD(CALC.MENTAL>.120 F 
ORTHO-REPER (ALG+GEOM).120 F 

DISQUETTES 


>IT EDUCATIF N» : 
(Meneranuftmsterr 
♦Nombres+Dico) 
KIT EDUCATIF N»: 
IMathasard+Orthc 
♦Histo Qui:) 


.299 F. 


PROGRAMMES HATIER 1 


-DIVISIONS.160 F. 

-QRTHOCRAC).185 F. 

DISQUETTES 

-BAC ECONOMIE (DISK'.890 F. 

-BAC MATH. C-E (DIS) ).890 F. 

-BAC MATH.Al-D-B (DISK).890 F. 

-EtAC PHYSIQUE (DISK)---890 F. 

I PROGRAMMES CORE I 

CASSETTES 

-ANATOMIE.150 F 

-ASTRO. 150 F 

-CAMELEMATHS.150 F 

-CAMELEMOTS.150 F 

-LA FRANCE.150 F 

-LE MONDE.150 F 

-ORTHOSTRAD.150 F 

-SQUELETTE.150 F 

DISQUETTES 


NOUVEAU 
dBASE2 
790 F 


-ANATOMIE.199 F 

-CAMELEMATHS.199 F 

-CAMELEMOTS.199 F 

-LA FRANCE.199 F 

-LE MONDE.199 F 

-ASTRO.199 F 

-SQUELETTE.199 F 

I PROGRAMMES DIVERS I 

CASSETTES 


-BALLADE/PAYS DE BIG BEN.180 F. 

-MICROGE0.140 F. 

-NUMERUS.150 F. 

I DISQUETTES 










































































































































































AMSTRAI 


LE NOUVEL 
AMSTRAD PRO" 

LECTEUR 

DISQUETTE FD 2 1990 F 
INTERFACE 

RS 232 CPS 8256 690 F 


PCW 

8256 



EN STOCK DISPONIBLE IMMÉDIATEMENT 

GESTION FAMILIALE GESTION ENTREPRISE JEUX AMSTRAD • CASSETTES JEUX AM! 


JEUX AMSTRAD • CASSETTES 


«30 


CASSETTES 

-EASY BAN) -GESTION. 

-GESTION FAMILLIALE (Ban quai. 

-HOUE BUDGET. . 

-MUL T I GEST I QN FAMILIALE. 

DISQUETTES 

-AGENDA. 

-BUDGET. 

-CAHIER DE TEXTE. 

-CARNET ADRESSES. 16! 

-EASY BAN) (Gaat ion) «REPORT. . . 34! 

-GESTION DOCUMENTAIRE. 10' 

-GESTION DOMESTIQUE. 00' 

-GESTION FAMILIALE. 09' 

-INTEGRE N"1. «9. 

-MUL T I GESTION FAMILL/CF GRAPH 


TABLEURS 


CASSETTES 


!«5 F 


DISQUETTES 


-CALCUMAT * GRAPHIQUE. «30 F 

-EASY CALC lTab 1 »ur)«REPORT.. $«3 F 

-M1CR0SPREAD (Tablaur). 580 r 

-MULTIPLAN. 499 F 


TRAITEMENT TEXTE 


CASSETTES 


DISQUETTES 


-AIDE BUFJEAUTIOUE. 030 

-COMPTA GENERALE AMSTRAD. «30 

-FACTURATION. 030 

-FACTURATION. 0«S 

-GESTION D'ENTREPRISE. 0«3 

-GESTION DF RTOO. 0«5 

-STOC). Q3Q 

DISQUETTES 

-AM COMPTA(Racat.-D#p*n»,>... 75" 

-COMPTA GENERALE AMSTRAD. 750 

-COMPTABILITE GENERALE.16«0 

-DEVIS/SI TUAT ION TRAVAUX.10B0 

-FACTURATION CAISSE DETAIL...1"90 
-FACTURATION STANDARD PLUS...1390 

-FACTURATION STANDARD.1160 

-FACTURATION*EDIT.SPECIALE...l«7o 

- FACTURATION/STOC'. 343 

-GESTION D'ENTREPRISE. 395 


PROGRAMMATION 


CASSETTES 

-AIIMUTH. 

-CONCISE BASIC (T.1). 

-DD 1 F IRMWARE MANUEL. 

-FIRMWARE (Routlnaa ROM). 

-H. BASIC (48 NI las comnd») 
-INITIATION AU BASIC <2 K71 . . 

-SUPERSPRI TES. 

-TEACM VOURSELF BASIC (T.2).. 

-UTILITAIRES (Boita a outil). 

DISQUETTES 

ACCES OIRECT/UDOS 1.2-. 

-CPC TURBO. 

I.IT 5 UTILITAIRES FRANÇAIS.. 

-LOGO EN FRANÇAIS. 

-SUPERSPRI TES. 


Il RE S (Boit 


» outil 


220 i 


-AM3W0RD. 

-M1CR0PEN (Ta: 
-MICROSCRIPT ' 
-TEXTOMAT. 


BASE DE DONNEES 


DISQUETTES 


FICHIER 


CASSETTES 

-EASY FILE-FICHIER. 

-GESTION DE FICHIER. 

-MA BASE (FICHIER). 

-MASTERFILE (FICHIER). 

-MINIFILE (FICHIER). 

DISQUETTES 

-EASY FIL.E (Fichier) «REF'ORT . . . 

-GESTION DE FICHES. 

-GESTION DE FICHIER. 

-MASTERFILE (Fichier). 

-MASTERFILE. . 


ASSEMBLEUR 


CASSETTES 

- HUTOFDRMAT ION ASSEMBLE 1>R_ 19! 

-DAMS ASSEMBLEUR. 29! 

-DEVPAC/ASSEMBL ■ DESSAbL-. 29. 

~ disquettes" 

-AUTOFORMATION ASSEMBLEUR.... 29i 

• DAMS ASSEMBLEUR. 39! 

-DEVF'AC/ASSEM. DESSASSAMB. 34! 


GRAPHIQUES 


CASSETTES 


DISQUETTES 


-EASY GRAPH ♦ EASY REPORT... 


DESSIN 


PROGRAMMES 

DIVERS 


CASSETTES 

-CODE DE LA ROyTE. 

DISQUETTES 

-DECISiqN MA) ER (Anal y»*>- 

-ENTREPRENEUR. 

-PROJECT PLANEUR (Anal y«e>... 
-STARWATCHER (Etude étoiles). 


CASSETTES 

-COREPAINT. 193 

-EASY AMSCODE. 149 

-GRAPHICORE (CAO-DAO). 243 

-LORI GRAPH. 210 

-MAGIC PA INTER. 120 

-SALUT L'ARTISTE (DAO). 185 

-COREPAINT. 199 

-DAO. 1 7u 

-LORI GRAPH. 310 

-MAGIC PA INTER. ISO 

-SALUT L’ARTISTE. 245 


Magasin Exposition-Vente 


HYPER-CB 

Communication 

183 rue Saint-Charles 
75015 Paris 
16 (1) 45.54.39.76 

Métro Place Balard 

ouvert du lundi au samedi de 9 h 30 à 19 h 30 


1013. 

3 D FIGMT. 

-3 D GRAND PR1I . 

-3 0 MEGACOOt. 

-3 D STUNT RIDER. 

-3 D VOICE CMESS 'ECm£CS>.. 

-3*«a axe. 

-A VIEW TO A > ILL 'J. BONO. . 

-ABbUROITY. 

-AFFAIRE EN OR. 

-AIRNOLF. 

-AlIEn 8 . 

-AMELIE MINUIT . 

-AMERICAN FOOTBALL. 

-AMIRAL GAAF SP££. .. 

-AMSGULF. 

-AMSTRAl 'ASTROLOGIE>. 

-ANOROID 1. 

-AFPRENT I SORCIER. 

-ARGO NAVtS. 

-ATLANMS. 

-ATT AOuC ASTRALE. 

-AT TROUE Aux LASER. 

-AVENTURE ClASSIOuC. 

-AVENTURES Au CHATEAU. 

-PAO MAX. 

-BAGNE DE NEPMARIA. 

-BAllAOE/PAYS DE BING BEN. . 

BATAILLE D'ANGLETERRE. 

BATAILLE DE MlDwAi. 

-BEACm h£au. 

-BIJOUX DE STRAOuS. 

-8I0RYTME3 . 

-BOURSE. 

BRISEURS 0' ATOMES. 

-BRUCE LEE. . 

-BUGGV 2 . 

-bugs buster. 

-CAULOF.ON. 

-CHALLENGER REVERS!. 

-CMC ORS. 

-ChIROlOOIE. 

-CMOPRER 60UA8. 

-COBRA 'ARCADE >. 

-COMBAT lynx. 

-COURSES'LES CLASSIQUES'... 

-COURT CENTRAL. 

-CUB BEAT. 

-CUBS T (MORPION iN 3 ü. 

-CVRUS 2 (ECHECS 3 D>. 


LANGAGE 


CASSETTES 


DISQUETTES 


-DARN ST AA. 

-OCCAT.A.ON. . 

-OEFENO OA OIE. 

-DERNIER METRO. 

-DETECTIVE 'CL UE 00'. 

-DIAMANT IlE MAUDITE. 

-DON JUAN. 

-DOSSIER G. 

-ECHECS ET MAT. 

-ECONOMAT. . 

-EMPIRE. 

-ENVAHISSEURS DE L'Au DELA . . 

-CvCRv ONE'Î. A WALL Y. 

-EXOCET. 

-EtPiODlNG FIST. 

-FAIRE UN PONT. 

-FAUCONS DE L ESPACE. 

-FlGHtER PIlOT. 

-FIGHÎING WARRIO». 

-FlIGTh PATm 73» (SIMULATEUR) 

-FOOT. 

-FORCE «. 

-FORMULA I SIMULATOR. 

F R AN) BRUNO S BOX ING. 

-FASO L ELECTONICIEN. 

-FRUIT MACHINE IJAC) PO»I_ 

-OAlachip. 

-GhOSTEMjSTERS. 

-GOLF de OINGUCS. 

-GRAPHOLOGIE. 

-GUI TER. 

-GYROSCOPE. 

-MAO ER. 

•MEROES OF ) ARN. 

-MlGHWAv ENCOUNTER. 

-HlSTO-OUltt. 

-MHS COBRA. 

-HOBBIT (LIVRE EN FRANÇAIS'.. 
-HOBBIT.... 

-mOlO U*. 

-HOLLYWOOD ‘ALALE.. 

■HOUSE OF USHCR. 

MUNBAO 2. 

-myPEA SPORT. 

m.‘ERSPACE. 

-INFERNAL RUXMCR. 

JARDINS HANTES tFACMAN'. 

-JEANNOT LE ROUGE. 

-JET SET WlLL». 

-JEHCLS OF BABYLONE. 

-J0X99X* REB... 

-JUF1P JET. 

-* IM. 

• NlGHf LORT.. 


PROGRAMMES 

DIVERS 


CASSEnES 


-KONG STIF.E BAC). 9 

-F.RISTAL . !«' 

-L'OR DES DRAGONS. 9' 

-LABYRINTHE DU SULTAN. 9' 

-LE SURVIVANT . 12' 

-LOTO. 12! 

-M.UOONG LOOFY LAUNDRY . 9' 

-MACADAM BUMPER. 1 6' 

-MANAGER. 16' 

-MANDRAGORE. 2*' 

-MAN1C MINER. 9' 

-MARSPORT. 12' 

-MASTER OF LAMPS. 13' 

-MATCH DAY . 10' 

-MECANO DE LA CENTRALE . 9' 

-MEURTRE A GRANDE VITESSE.... 1B> 
-MEURTRES SUR L' ATLANTIOUE... 22' 

-MICRO SAPIENS . 

MlLL IONNAJRE. 

-MISSION DELTA. 

-MISSION DETCCTOR..... 

-MISTER FREÉIE. 

-MONOPOLlC . 

-MOTO DRIVER. 

-MUSIC COMPOSER . 

-MUTANT MONT Y. 

-MYSTERE DE )!*.£> AN) 01 

-NIGhT BOOSTER . 

-NOM OE COOE MAT . 

-NO*. TM SEA BULL ION.... 

-OBSIOIAN. 

-OH MOMIE. 

-Olympe. 

-OAOI- TIERCE . 

-OThEllO NAS'ER. 

-PESTE INTERSTELLAIRE. 

-PILOTE DE GRAND PRIX. 

-FINBALL (FLIPPER).... 

-PITMAN DACTYLO. 

-FLAYBOX. .f? . 

-POLICHINELLE. 

-POSEIDON 

-PROJECT VULCANO . 

-PYJAMARAMA. 

-OUASIHQDO. 

-RAID OVER MOUSCOU.... 

-RAID SUR TENERE. 

-RALLYE 2 . 

-RED ARROWS. 

-RED COATS . 


. 140 


. 180 


. 130 


JEUX AMSTRAD • DISQUETTES 


I D GRAND PRIX.170 

• D VOICE CHESS (ECHECS).... 190 
S0.000 LIEUX S/LES MERS 150 


ACCESSOIRES 


CABLES ET RALLONGES 


CABLE BRANCHEMEN1 2 JOVSTICI S. 270 F 

CABLE CENTRONIC/ IMPRIMANTE_ 130 F 

CABLE POUR LECTEUR K 7. 99 F 

RALLONGE AL 1M MONITEUR. 90 F 

RALLONGE MONITEUR . 70 F 


130 


HOUSSES PROTECTION 


HOUSSE CLAVIER 464/664. 

HOUSSE CLAVIER 6128. 

HOUSSE LECTEUR DD1 OU FOI. 

HOUSSE MONITEUR COULEUR- 

HOUSSE MONITEUR VERT. 


HQUSSES CLAaMON.COUL. 464/664. ! 

HOUSSES CLA-MON. COUL.6128 . I 

HOUSSES GLA.MON.VERT 6218. 1 

HOUSSES CLAV.MON I T.VERT464/664 I 

CONSOMMABLES PAPIER I. RUBANS.. 


IP1ERS IMPRIMANTE 


300 FEUILLES SIMPLESI24. 
230 FEUILLES DOUBLES(24: 
2500 FEUILLES SIMPLES c 


RUBANS RECHANGE IMPRIMANTES 


RUBAN RECHANGE IMPRIMANTE 8256 

RUBAN RECHANGE DMPI. 

RUBAN F 


-PRINTER PAC 1 

-SCRIPTOR. 

-SYCLONE 2_ 

-SYSTEM I. 

-TOMCAT. 


-1E0IS 2. . 


DISQUETTES 


-ODDJOB. 

-PRINTER PAC I 
- SCR IF T OR 2... 
-SYCLONE 2. . . . 

-SYSTEM X. 

-TOMCAT. 

-TRANSMAT. 

JEDIS 2. 


CASSEnES INFORMATIQUE 

10 min 15 min 

85f 88f 


-A VIEW TO A FILLIJ.BOND' ... .220 

-ABSURDITY. 199 

-AIRwOLF.130 

-AMELIE MINUIT..220 


BAGNE DE NEPHARIA.163 


«AD. . 


-BIORYTf 

-BRUCE LEE.IBi 

-CENTRE COURT.I7C 

-CHALLENGER REVERS I.19l 

-CYRUS 2 (ECHECS 3 D).16( 

-OEVILS CROWN.17< 

-DUN DARACH.171 


-EMFIRE. 

-EXOCET. 

-FANTASTIQUE VOYAGE.. 
FIGHTER PILOT. 


-POOT. . 


■ BRUNO'S BOX! 
-FRED L'ELECTRONXC! 

-GRAPHOLOGIE. 

-MIGHWAY ENCOOTER.. 

-MMS COBRA. 

-HOLLYWOOD PALACE.. 
-HUNCHBAC) ......... 

-HVPERSFACE «. 


-Rfi»6 OF DARi NESS. 

ROCf y HORAOR SHOW. 

-ROLANO A . ABORDAGE . 

-ROLAND A LASCAux. 

-ROLAND Al CARRE. 

-roland aux oubliettes. 

-R.1LAND EN Fuite . 

-ROLAND FAI-/PETI-S TROlS.. 
-ROlSnC voyage/le temps.... 

-sabre WOLF . 

-SCOUT STEPS Out. 

SERIE NCIRE . 

-SIR lANCElOT. 

-S» YFOX . 

-SLAPShOT. 

-SNCOFER 'BlL.ARO) . 

-SORCERY. 

-SPECIAL OPERATION . 

-SPECTRE D'ANUBIS. 

-8PLAT. 

-SPTIFIRE 40 . 

-SP Y VERSUS SPV. . . . 

-STAR COMMANDO. 

-ST ARI ON. 

-STOCPHAfi.ET . 

-ST RANGE L OUP. 

-STRESS. 

-STRIP PO) ER. 

-6TR0NG MAN . 

-SURVIVANT. 

-SURvIvOR. 

-TALES OF AAA&IAN NIQhTS... 
-TOUR OU MONDE/eu JOURS. . . . 

-TOUR FANTASTIOUC . 

-TRANSAT ONE. 

-TRIVIA. 

-TROISIEME DIMENSION. 

-TYRAN . 

-VILLE INFERNALE. 

-WARlORD. 

-WARRIOR. 

-WINTER SPORT . 

-Wl/ARD'S lAIR. 

-WORLD SERIE (BA9EBALL!_ 

- wORl D wAR '. 

-wÛRLDCuF. 

-lANAQRAMS. 

-VIE AR .UNG-FU. 

•1QRRQ. 

E 

!NF EANA^ RuNNER. 

■ JUMP JET. 

-) IT 4 PROGRAMMES. 

-T.RISTAL. 

-MACADAM BUMPER (FlIPPERi.. 

-MANAGER. 

-MANDRAGORE. 

-METRO 2018. 

-MEuR'RE / GRANDE vl'ESSE.. 
-MEURTRES S'L•«r.ANTIOLE... 

-MISSION OELTA. 

-NOM. OE COOE MAT. 

-OROI-TIERCE. 

-ORPHEE. 

-F INBAllfNIGmT BOOSTER. 

-POLICHINELLE. 

-RAID OVER HOUSCOU. 

-RALLYE 2. 

-REFLEXION <DAMES-REVERS 1i . 

-ROLANO A L'ABORDAGE. 

-ROLAND A LASCAux. 

-roland aux oubliettes. 

-ROLAND DANS LE TEMPS. 

-rqland en fuite. 

-ROlAND foi‘/PETITS TROUS.. 

-SCOUT STEPS OUT. 

SNOOfER (BILLARD. 

-SDRCERV .. 

- SF ANNE RMAN. 

-STRIP ROFER. 

- TA) E FI VE. 

-TRIPLE PAC. 

-TRIVIA. 

-UNION JAC) . 

-VILLE INFERNALE. 


CREDIT 


Acceptation immédiate de vo¬ 
tre crédit. Auesitét vous partez 
avec votre matériel. 


Pièces è fournir : 

1 fiche de paye (la dermere) 

1 justificatif de domicile (quit¬ 
tance loyer. EDF PTT ) 

1 releve d'identite bancaire 
(RIB). 

t chèque annule par vous. 

1 photocopie piece d identité 
(CNI ou passeport) 


CRÉDIT IMMÉDIAT SUR TOUT LE MAGASIN 

A PARTIR DE 1500 F 


POUR COMMANDER PAR CORRESPONDANCE OU A CREDIT. ENVOYER CE BON A 


HYPCR-C 8 Communication 

Itl, rue Soint-Chort*» 75015 fori» TM. : 554 . 39.76 

Je desire recevoir (remplir le tableau ci dessous) 

ARTICLE 

QTE 

PRIX 

TOTAL 






1 * 

î| 















« " 3 

C ode Posta'- » g " 

- il! 









* CREDIT 

M 




je desife recevoir une offre préalable oe crédit (CETELEM) 

Partie***!)** aux frai* < •»»* 

lolai de ia 
acommanO* 



* SOO F aioutar - ♦ SS F 

Tou* laa microa. monltaura. Imprimant** a 

t 

+ 


t 

□ chèque □ mandat-lettre DCCP 

CO*M-OOM-TOM *— a ****»mr 



































































































































































































































































































































































Dans la quatrième dimension des 
escaliers d'Esher, des Speeps se 
choquent et s'entrechoquent pour ne 
former qu'un seul être (le peep) et 
pouvoir enfin plonger au travers du miroir 
d'une cinquième dimension. 


MSX 
îffiaoN 


Près de 3 000 softs au Japon, une cen¬ 
taine en France ! Parmi ceux-ci, rares sont 
les logiciels de qualité. Heureusement 
des éditeurs français relèvent le défi MSX 
tel Nice Ideas. Voilà une bonne raison 
d’en parler. Un parc de micros MSX plus 
étoffé stimulerait peut-être les éditeurs 
les moins entreprenants. Avis aux cons¬ 


tructeurs. 

ILLUSIONS 

Illusions est un logiciel pour 
les amateurs de dessins 
d’Esher (graphiste et «géo¬ 
mètre» spécialiste de la 
perspective en trompe l’œil, 
véritable «névropathe de la 
topologie»). Il se compose 
de deux jeux se déroulant 
dans des univers sens des¬ 
sus dessous : le cube et le 
célèbre escalier sans début 
ni fin. Quatre petits Speeps 
vivent dans les escaliers. 
L’escalier d’Esher est le 
théâtre de courses effrénées 
de Speeps. Il faut réussir à 
fusionner ces petites créatu¬ 
res en une seule entité dé¬ 
nommée Peep. Des lézards 
les poursuivent afin de les 
mordre. Des bocaux remplis 
d’eau, s’ils sont renversés 


freineront les lézards. Les 
escaliers d’Esher sont ainsi 
faits qu'en sautant vers le 
bas il arrive de se retrouver 
à l'étage supérieur ! Le 
Peep, résultat de la fusion 
des Speeps, passe alors, au 
travers d'un miroir, dans une 
autre dimension. C'est le 
deuxième tableau : le cube 
en 3D, sans premier plan, ni 
arrière plan. Passé de l’autre 
côté du miroir, le Peep s'est 
à nouveau scindé en quatre 
Speeps. Et bien sûr, il s’agit 
de les réunir à nouveau. A 
ce stade, le jeu devient 
beaucoup plus difficile. Bon 
courage pour ce voyage 
dans la nième dimension ! 
Un jeu nouveau, extrême¬ 
ment original et réalisé par 
des méridionaux. 


FOOTBALL 

Les MSX, qui ont longtemps 
manqué de logiciels de jeux 
de bonne qualité, rattrapent 
petit à petit leur retard. Les 
décathlons, tennis et karatés 
existent depuis longtemps. 
Voici le football. Dans les 
buts, le gardien évolue dans 
les huit positions autorisées 
par le joystick (haut, bas, 
droite, gauche, etc.). Les 
plongeons et parades sont 
d'un grand réalisme. Sur le 
terrain, les joueurs courent, 
dribblent et font des passes, 
comme dans les Soccer et 
autres Football dédiés aux 
autres machines. A l’appro¬ 
che de la coupe du Monde, 
c’est le moment d’acquérir 
ce logiciel pour parfaire la 
qualité de son jeu de jam¬ 
bes. Football ne révolu¬ 
tionne pas le genre mais 
égale ses homologues pour 
les autres machines. 

PING-PONG 

Si les Chinois, autrefois maî¬ 
tres en matière de ping- 
pong, deviennent vulnéra¬ 
bles face aux Coréens et 
aux Suédois (dernières ren¬ 
contres internationnaies), 
pourquoi ne pas devenir 
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D'un graphisme légèrement supérieur à celui des autres 
« football », ce logiciel permet des tirs au but ou séries de 
penalties. Des matchs de 45 mn peuvent être programmés en 

début de jeu. Intenable ! 



La geste d’ArtIllac Des graphismes superbes pour une geste 
romantique à souhait. Un petit livre, très utile pour résoudre les 
énigmes proposées, est offert dans le coffret. Et pas besoin 
d’être une brute pour terrasser ses ennemis. 


soi-même un champion? 
Les raquettes sont tenues 
en prise «porte- plume» et 
la totalité des règles du ten¬ 
nis de table sont respec¬ 
tées. Le choix des coups 
(coup droit, revers, smash, 
balles coupées, etc.) s'effec¬ 
tue à l'aide du clavier (tou¬ 
ches curseurs). Un joystick 
aurait été certainement plus 
adapté. Ce n’est pas le gra¬ 
phisme qui fait l'attrait de ce 
jeu mais l'action et ses diffé¬ 
rents niveaux de difficulté. 
Certains rebonds sont par¬ 
fois un peu bizarres (atten¬ 
tion aux coupés). Ping-pong 
a le mérite d'être une bonne 
simulation d’un sport qui 
n'existe sur aucune autre 
machine actuellement. 

LA GESTE D’ARTILLAC 
Infogrames avait inondé tou¬ 
tes les gammes de micro 
avec son jeu de rôle Man¬ 
dragore. Les bouillants lyon¬ 
nais récidivent aujourd’hui 


avec La Geste d'Artillac, une 
ronde poétique où le joueur, 
par l’intermédiaire du héros 
de l’histoire, part à la recher¬ 
che de son père. Avec hu¬ 
mour et sensibilité, ce logi¬ 
ciel crée un nouveau genre 
que l’on aimerait voir se per¬ 
pétuer. Bien sûr, la magie et 
les combats sont au rendez- 
vous. Mais dans un décor 
admirable et avec une tona¬ 
lité moins brutale que dans 
la plupart des jeux de rôle 
ou d’aventure déjà vus. 

L’éditeur fournit en plus un 
petit livret de 64 pages très 
utile pour le bon déroule¬ 
ment de la partie. Il fourmille 
d’indices précieux et de 
mots mystérieux qui permet¬ 
tent de pénétrer plus profon¬ 
dément dans ce monde 
plein de surprises. La Geste 
d’Artillac réserve quelques 
moments inoubliables aux 
amateurs du genre. 
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BOULDER DASH 

Si ce jeu ne vous est pas in¬ 
connu, c'est que vous êtes 
possesseur d'un Apple ou 
d’un Commodore. Ce best- 
seller s’insinue enfin dans 
les mémoires de l'Amstrad 
et des MSX. Sans rien per¬ 
dre de ses qualités graphi¬ 
ques. Ni jeu de Go, ni war¬ 
game, Boulder Dash com¬ 
blera néammoins les ama¬ 
teurs de stratégie. Surtout à 
partir des niveaux 5 et 6. A 
travers un dédale de «piè¬ 
ces» le joueur doit principa¬ 
lement éviter de se faire 
écraser entre deux rochers. 
La solution finale se trouve 
au niveau 20, mais pour 
y parvenir le joueur devra 
garder une attention sou¬ 
tenue. Danger «chutes de 
pierres»... 


Chevalier au grand cœur, Lode 
Runner part en quête de tré¬ 
sors amassés par l’empire 
Bugellns. Ce Jeu d'échelle 
mondialement connu propose 
plusieurs dizaines de tableaux 
et la possibilité d'en créer soi- 
même. 


Faire du rodéo sur un taureau 
n’est pas à la portée de tous. 
Olé mérite de figurer sur vos 
étagères, ne serait-ce que 
pour son extraordinaire quali¬ 
té musicale. 



SELECTION MSX 

LA GESTE D’ARTILLAC 

(édité par Infogrames) 

Machines : MSX, Amstrad, 
Thomson 

Graphisme :••••• 
Bruitage : • • • 

Intérêt : • • • • • 

Prix :180F 

ILLUSIONS 

(édité par Nice Ideas) 

Machines : MSX, C64 
Graphisme : • • • • 

Bruitage : • • • 

Intérêt : • • • • 

Prix: 150 F 

FOOTBALL 

(édité par Nice Ideas) 

Machines : MSX, Thomson 
Graphisme : • • • 

Bruitage : • • 

Intérêt : • • • 

Prix :150F 
PING-PONG 
(édité par Kjonami) 

Machines : I^SX 
Graphisme : • • • • 

Bruitage : • • • 

Intérêt : • • • • 

Prix : 150 F 
BOULDER DASH 
(édité par Beyond) 

Machines : MSX, C64, Amstrad, 
Apple 

Graphisme : • • • • 


Bruitage : • • • 

Intérêt : • • • • 

Prix : 180 F 

D'autres jeux, moins récents, 
tournant sur MSX doivent égale¬ 
ment retenir notre attention. 

KATUVU 

(édité par Vifi-Nathan) 
Machine(s) : MSX, C64, 
Thomson 

Type de jeu : Educatif 
EDDY II 

(édité par Sony) 

Machine (s) : MSX 

Type de jeu : Graphique 

L'un des seuls logiciels 

graphiques et le plus 

performant 

PYRO-MAN 

(édité par Nice Ideas) 

Machine (s) : MSX 

Type de jeu : Arcade 

Jeu d’action (type échelle) où un 

pompier doit éteindre des feux. 

Voir M.V.O n°4 

TENNIS 

(édité par Kjonami) 

Machine (s) : MSX 
Type de jeu : Sport 
Identique aux multiples tennis 
déjà vus sur d'autres machines, 
Tennis est pour les sportifs le 
logiciel qu'il leur faut. 

YIE AR KUNG FU 
(édité par Imagine) 


Machine (s) : MSX, C64 
Type de jeu : Karaté 
En attendant que The Way Of 
Exploding Fist, soit en version 
MSX, c'est le meilleur Karaté. 

A VIEW TO A KILL 
(édité par Domark) 

Machine (s) : MSX.C64, 
Amstrad, Oric, Apple 
Type de jeu : Action/Aventure 
Sorti à l'occasion du film 
(même titre) c'est un bon jeu 
d'aventure/action. M.V.O n° 1 
OLÉ 

(édité par Vifi-Nathan) 

Machine (s) : MSX, C64, 
Amstrad 

Type de jeu : Action 
L'un des logiciels de jeu roi de 
la musique. Prenez-vous pour 
un toréador. Voir M.V.O n° 4. 
MASTER OFTHE LAMPS 
(édité par Activision) 

Machine (s) : MSX, C64 
Type de jeu : Aventure 
Les MSX possèdent peu de 
jeux (tout du moins en France) 
et donc d'autant moins de 
logiciels d'aventure. Le maître 
des lampes est de ceux à 
posséder dans sa logithèque. 
SORCERY 
(édité par Virgin) 

Machine (s) : MSX, C64, 
Amstrad 

Type de jeu : Aventure/Action 


Il n'est plus nécessaire de 
présenter Sorcery. Adapté pour 
la majorité des micros, ce 
logiciel fait partie de ce qui se 
fait de mieux dans le style 
action/aventure. M.V.O n° 3. 
MANDRAGORE 
(édité par Infogrames) 

Machine (s) : MSX, C64, 
Thomson 

Type de jeu : Rôle et Aventure 
Pour les mordus de jeu de rôle 
qui ne possèdent ni Apple ni 
Commodore, le logiciel 
d’Infogrames est l'un de ceux à 
avoir sur MSX. Voir M.V.O n° 2. 
ANTARCTIC ADVENTURE 
(édité par Kjonami) 

Machine (s) : MSX 
Type de jeu : Action 
Un pingouin essaie de faire le 
tour du continent Antarctique. 
Sur son passage il doit éviter 
des trous percés dans la glace 
de la banquise. 

FRUTYFRANK 
(édité par Kuma) 

Machine (s) : MSX 
Type de jeu : Action 
LODE RUNNER 
(édité par Broderbund) 
Machine (s) : MSX, C64 
Type de jeu : Arcade 
En attendant BulderDash Ile t 
YieArKung Fu II qui paraîtront 
prochainement. 
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NOUVEAUTÉS 



BOLCHOÏ (TO 7, MO 5) 




Tarot propose une formule à quatre joueurs. 
De la « petite » au « grand Schlem », toutes 
les règles du jeu de Tarot sont respectées. 
Nice Ideas, 150F. 


EDEN BLUES (Amstrad) 



Les robots ont gagné la guerre. Il n'y a 
qu'une survivante que le joueur, dernier 
mâle de l’espèce humaine, doit retrouver. 
Ere Informatique, 180 F 


Ce jeu d’aventure, l'un des best-sellers 
d'Oric, a été adapté pour Amstrad sans au¬ 
cune modification du graphisme. 

Loriciels, 130 F 

MONSEGUR (Amstrad) 



La mort rôde dans les oubliettes du château 
de Monségur. Rapidité et réflexes seront 
nécessaires pour réussir à lui échapper. 
Artisoft, 120 F 


Un danseur russe exécute les figures impo¬ 
sées par le joueur transformé pour l’occa¬ 
sion en chorégraphe. Un « kasatchok» sur 
fond sonore. Coktel Vision, 140 F 


FANTASTIC VOYAGE (Amstrad) 



Des grottes, des couloirs fréquentés par 
d'étranges individus malfaisants. De nom¬ 
breux pièges guettent les voyageurs auda¬ 
cieux. Artisoft, 150 F 


AIR ATTACK (TO 7) 



Second simulateur de vol, après Airbus, 
pour Thomson. De nombreux combats aé¬ 
riens aux commandes d’un chasseur nom¬ 
mé TO 7. Loriciels, 200 F 


MICROCOSM (C 64, Amstrad) 



Un jeu d’arcade mettant en scène un jardi¬ 
nier. De conifère en azalée, il doit soigner 
ses plantes et détruire les insectes qui me¬ 
nacent ses protégés. Firebird, 120 F 


CONTAMINATION (Amstrad) 



Un virus frappe la population mondiale et 
sème la terreur. Haut responsable de la sé¬ 
curité, vous devez enrayer l’épidémie. Ere 
Informatique, 150 F 


OCEANIA (T07, M05) 



L'aventure au bout des mers. Microïds/Lori- 
ciels, 150 F 
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1936 Tandis que la situ) 
politique s'aggrave en Eui 
au Havre, le plus grai 
le plus luxueux paqu 
du monde appareille 
New-York A son I 
une clientèle fortum 
insouciante et pou 
un drame va se (ouer per 
la traversée. Vous 
trouverez ainsi pr 
au cceur de la plus incroi 
histoire d'espion 
qui permit aux i 
de gagner la seconde gi 
mondiale S ans plus t 


On'ljcim ! 


MEURTRE SUR 
L’ATLANTIQUE 

Ce titre rappelle beaucoup 
Meurtre à grande vitesse. 
Une bonne recette amélio¬ 
rée, pourquoi pas? Plus de 
quarante personnages ont 
été introduits dans ce pro¬ 
gramme au graphisme 
beaucoup plus élaboré. 
L’histoire se déroule dans 
les années trente à bord du 
transatlantique Bourgogne. 
Il s’agit de résoudre une af¬ 
faire d’espionnage au temps 
des balbutiements de l’infor¬ 
matique et de permettre ain¬ 
si aux alliés, huit ans plus 
tard, de gagner la guerre 
face aux armées alleman¬ 
des... Cette fiction repose 
sur des faits historiques. 
Pendant la dernière guerre 
mondiale le Bourgogne, pa¬ 
quebot français réquisition¬ 
né par les anglais, effectua 
de nombreux transports 


d’armes et de munitions. 
Avec son léger camouflage 
et ses nouvelles superstruc¬ 
tures, il sema aisément les 
navires ennemis grâce à 
son radar (une nouveauté à 
l’époque) et à ses moteurs 
puissants. Lancé en 1937, il 
coule, chargé d’or en mer 
Baltique fin 1943. 

LA BATAILLE 
D’ANGLETERRE 

Dans ce ffeu, le mélange des 
styles «arcade» et «war¬ 
game» rend possible le 
choix de l'action ou de la 
stratégie pure. Une carte de 
Grande-Bretagne affichée 
en début de scénario indi¬ 
que les villes, les bases et 
les radars. Le jeu mis en 
route, les avions allemands 
commencent à sillonner le 
ciel au- dessus du Channel. 
Il faut alors choisir les bases 
d’où décolleront des Spitfi- 


res et des Hurricanes. Pen¬ 
dant la phase des combats, 
en option «arcade», le 
cockpit de chacun des types 
d'appareil est différent et il 
est possible d’utiliser la 
DCA au sol. Si les stations 
radar sont mises hors ser¬ 
vice par la Luftwaffe les atta¬ 
ques ennemies seront dé¬ 
couvertes tardivement. Tout 
y est. 

La Bataille d'Angleterre , tout 
comme Théâtre en Europe 
et La Bataille de Midway, est 
un grand moment de straté¬ 
gie. 

ROME, ROMULUS ET MOI 

De 763 avant J.-C. à l’apo¬ 
gée de l’empire, au n e siècle, 
près d’un millénaire de con¬ 
quêtes romaines défilent 
dans ce jeu. Centurion, vous 
marchez à la tête de légions 
dans les pas (littéralement) 
d’Auguste ou de César, 


Ici, aux commandes d’un 
Spitfire, c'est une véritable 
simulation de vol que 
propose « La Bataille 
d’Angleterre ». Mais au sol, 
attention à vos stations 
radar! Un wargame qui allie 
arcade et stratégie à la 
perfection. 
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A l'occasion de la sortie de 
« Meurtre sur l’Atlantique», 
Cobra Soft organise un 
concours dont le premier 
prix est une croisière en 
Méditerranée pour deux 
personnes. Le formulaire 
permettant d’y participer se 
trouve dans le coffret avec 
les nombreux indices qui 
vous sont offerts pour 
essayer de résoudre 
l’énigme du Bourgogne. Un 
crime a été commis à bord, 
il s’agit de retrouver le (ou 
les) meurtrier(s). 


Dans « Le Mur de Berlin», un terroriste a 
décidé de faire sauter le mur qui sépare 
Berlin en deux zones pour provoquer un 
conflit entre l'Est et l’Ouest. En bon 
espion, vous devez le démasquer - 
Inutile de compter sur l’aide de la 
police ! Seul renseignement : « l'affreux 
jojo» fréquente les milieux gay du Berlin 
nocturne. Édité par Froggy Software 
pour Apple (195 F). 


A QVI FAI TES-VOVS VWE OFFPAWbE ? 


Pourquoi ne pas se 
prendre pour César le 
temps d’un « Rome, 
Romulus, et moi». 
D’autant que cette 
mégalomanie a des 
chances d’être payante. 
Free Game Blot, à 
l’occasion de la sortie 
de ce logiciel, organise 
un concours avec, à la 
dé, un voyage pour deux 
personnes à... Rome ! 


pour étendre votre domina¬ 
tion à tout le Bassin méditer¬ 
ranéen. Sur l’écran, une 
carte permet à tout moment 
de situer ses forces et de 
définir ses objectifs. Pour 
chaque action entreprise le 
temps s’écoule plus ou 
moins vite. Cette course 
contre la montre représente 
une des grosses difficultés 
du jeu. C’est en collant de 
près à la réalité historique 
que vous réussirez votre 
conquête. Durant les guer¬ 


res de conquête, le moral 
des armées, l’état des finan¬ 
ces de l’Etat, la clémence 
des dieux sont des élé¬ 
ments avec lesquels il faut 
composer. Avant J.-C., les 
indications affichées à 
l’écran sont datées par rap¬ 
port à la fondation de Rome. 
Jeu éducatif, jeu d’aventure 
et de stratégie, Rome, Ro¬ 
mulus et moi présente un 
grand intérêt pour approfon¬ 
dir ses connaissances de 
l’histoire romaine. 
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SELECTION DU MOIS 



RUINE PAR LES RETOMBEES DE LA CRISE DE 
1929, AUENTURI ER A LA DERI UE , UOUS EN 
ETES REDUIT A EPLUCHER LES PETITES 

ANNONCES... >RETURN< 


O. 


OlO 


O 


O: 


o_o 


O 


J* AI GAGNE. CE FUT UN PLAISIR 


Après avoir relevé dans les petites annonces du Morning Star le 
numéro de téléphone d’un docteur chinois proposant une 
aventure pleine de risques mais bien rémunérée, une victime de 
la crise de 1929 va vivre de multiples péripéties dans la Chine 
d’avant-guerre. Confronté à des trafiquants de drogues, son 
séjour ne sera pas de tout repos. 


LE TAXI PROMIS UOUS ATTEND ! UOUS 
MONTEZ, IL DEMARRE. . . >1 


OPIUM 

Victime de la crise économi¬ 
que de 29, un aventurier au 
chômage épluche les peti¬ 
tes annonces : «Cherche 
homme qui connaisse la 
Chine pour mission péril¬ 
leuse. Contacter le Dr Ching 
Wha.» Une aubaine ! Et de 
plus bien payée. Avant de 
donner des détails sur cette 
mission, le docteur teste les 
capacités mentales du can¬ 
didat au cours d’une partie 
de «pente» (morpion co¬ 
réen), met à l’épreuve son 
aptitude physique (karaté) et 
évalue sa vivacité par un jeu 
de réflexes (sons et images). 
Après avoir franchi ces 
épreuves, le joueur atterrit à 
Shanghaï, point de départ 
d'un périlleux périple en 
Chine. La finalité du jeu est 
d'obtenir la confiance d'un 
chef de village, qui organise 
le trafic de l’opium à destina¬ 
tion de l’étranger, pour 
mieux déjouer ses plans. 
Des idéogrammes chinois 
permettent de reconnaître 
les amis et préviennent des 
dangers. Passionnant ! 


PSI-5 

Le but du jeu est de ravitail¬ 
ler les habitants d'une pla¬ 
nète éloignée. Le transport 
est effectué par vaisseau in¬ 
tergalactique dont l’équi¬ 
page (cinq personnes) a été 
judicieusement sélectionné 
parmi une trentaine de per¬ 
sonnages aux caractères 
très différents. Leur tempéra¬ 
ment donnera le ton au 
voyage. Les communica¬ 
tions en vol avec l'équipage 
se font par circuit vidéo. Un 
écran de contrôle montre les 
parties principales du vais¬ 
seau, un autre diffuse les 
images de l'espace. PSI-5 
est une incroyable combi¬ 
naison d’action, de gra¬ 
phisme très élaboré et d’élé¬ 
ments de jeu tous plus inté¬ 
ressants les uns que les 
autres. La qualité de l’anima¬ 
tion atteint les sommets de 
Law Of The West (voir MVO 
n°3), également présent sur 
le catalogue d’Accolade Inc. 

BAD MAX 

La mention 3D, trop souvent 
employée à tort, trouve sa 


véritable application dans ce 
jeu qui réclame de chausser 
des lunettes spéciales four¬ 
nies avec le coffret. Autre ef¬ 
fet spectaculaire, la stéréo, 
qui nécessite quand même 
de récupérer le casque de 
votre chaîne Hi-fi, Le but du 
jeu est simple : survivre. Le 
V8 de la bagnole de Bad 
Max tombe en rade. Des 
loubards en quête de mau¬ 
vais coups et des flics en 
mal de passage à tabac rô¬ 
dent dans le secteur. Ça 
sent la mort... D’autant que 
pour subsister, Bad Max de¬ 
vra manger des cadavres : 
l'épicerie est Closed depuis 
que son propriétaire a été ir¬ 
radié. Deux manières de 
s'en sortir : être fairplay ou 
carrément infâme. Le logiciel 
est en verl'en, français et 
franglais. Une ambiance du 
tonnerre ! 

LE SECRET 
DU TOMBEAU 

Avec Le Secret du tombeau, 
Loriciels célèbre à sa façon 
la reprise d’activité d’Oric, 
devenu français. Les ama¬ 


teurs de graphisme risquent 
d'être un peu déçus. Mais 
les sportifs aguerris et aux 
bons réflexes visuels seront 
contentés. Ce jeu rappelle 
L'Aigle d'or dans sa présen¬ 
tation et son utilisation (tou¬ 
ches de déplacement, ins¬ 
tructions «fermer», «pren¬ 
dre », etc.). Il s'agit de retrou¬ 
ver une pierre miraculeuse 
dissimulée au sein d'une py¬ 
ramide aztèque Dans la 
peau d'un archéologue, il 
vous faudra affronter des 
créatures démoniaques, et 
surmonter de nombreux piè¬ 
ges. Si l'arcade n'a pas de 
secret pour vous, peut-être 
ressortirez-vous du tom¬ 
beau... 

GLOBE TROTTER 

Embarqué à bord d’un cargo 
et employé à la chaudière, le 
joueur est un globe-trotter 
sans le sous. Alors qu'il en¬ 
fourne ses pelletées de 
charbon dans la chaudière, 
des coups sourds sont frap¬ 
pés, à l’une des cloisons. 
Son esprit aventureux le 
pousse dans la coursive 
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pour en avoir le cœur net. 
Après avoir visité successi¬ 
vement un atelier rempli 
d’outils, la cabine d’un 
homme d’équipage, la cale 
où se trouvent une cargai¬ 
son douteuse, etc., notre 
homme atterrit sur le pont où 
le capitaine bougon et auto¬ 


ritaire, le somme de redes¬ 
cendre travailler... 

De nombreux objets peu¬ 
vent être découverts à bord, 
mais la curiosité étant un vi¬ 
lain défaut, se faire prendre 
équivaut à un débarquement 
immédiat et un peu brusque 
en terre étrangère. Un 


conseil, n'essayez pas d’at¬ 
tenter à la pudeur des jeu¬ 
nes femmes que vous ren¬ 
contrez. Vous risquez la pri¬ 
son. Les aventures de Globe 
Trotter sont à découvrir au 
plus vite, même si vous ter¬ 
minez dans la marmite 
d'anthropophages ! 


DERNIÈRE MINUTE 



Un climat de 
tension politique 
extrême règne dans 
« Pouvoir», le 
dernier jeu de 
stratégie de 
Loriciels. Il faut 
empêcher le député 
de prononcer son 
discours de clôture 
de campagne 
électorale sur la 
Grand Place. 

Pour cela deux 
solutions : éliminer 
un à un les 
policiers qui le 
protègent ou 
l'encercler. Une 
chaude ambiance. 
Un avant goût des 
législatives ? 


EN AVANT-PREMIÈRE 



Aux commandes d’un cargo de l’espace, faites du commerce avec les 
habitants d’autres planètes. Des pirates sillonnent la galaxie à la 
recherche de proies faciles. A l’aide d’écran vidéo 
gardez l’œil sur l’équipage et 
l’extérieur. 


SELECTION DU MOIS 

MEURTRE SUR 
L’ATLANTIQUE 

(édité par Cobra Soft) 

Machine : Amstrad 
Graphisme :••••• 
Bruitage : • • • 

Intérêt : • • • • • 

Prix : cassette 220 F, disquette 
279 F 


OPIUM 

(édité par Ludia) 
Machine : Apple : 
Graphisme : • • 
Bruitage : • • 

Intérêt : • • 

Prix : 200 F 


ROME, ROMULUS ET MOI 

(édité par Free Game Blot) 
Machine : Thomson 
Graphisme : • • • • 

Bruitage : • • 

Intérêt : • • • • 

Prix : 150 F 


GLOBE TROTTER 

(édité par Ludia) 
Machine : Apple 
Graphisme : • • • 
Bruitage : • • • 

Intérêt : • • • 

Prix : 200 F 


LA BATAILLE 
D’ANGLETERRE 

(édité par Ere Informatique) 
Machine : Amstrad 
Graphisme : • • • • 
Bruitage : • • • 

Intérêt : • • • • • 

Prix : 150 F 


LE SECRET DU TOMBEAU 

(édité par Loriciels) 

Machine : Thomson 
Graphisme : • • • • 

Bruitage • • • 

Intérêt : • • • • 

Prix : 120 F 


BAD MAX 

(édité par Eurêka) 
Machine : Amstrad 
Graphisme : • • • • 
Bruitage : • • • 

Intérêt : • • • • 

Prix : 120 F 


PSI-5 

(édité par US GOLD) 
Machine : C64 
Graphisme • • • • 
Bruitage : • • • • 

Intérêt : • • • • 

Prix :170F 


Rubrique réalisée 
par Yves Huitric 
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DROITS D’AUTEUR 
FRANCS TIREURS 
ET MERCENAIRES 

Dans le domaine de la micro 
tous les abus sont possi¬ 
bles : cela va du vol pur et 
simple du logiciel au pira¬ 
tage systématique et organi¬ 
sé. A titre d’exemple, le logi¬ 
ciel anglais Visicalc a été 
piraté près de dix fois par 
exemplaire vendu. On a pu 
estimer à 120 millions de li¬ 
vres la perte qu'a subie le 
propriétaire du logiciel. Un 
système de protection a 
donc été mis en place dans 



la loi du 3 Juillet 1985 rela¬ 
tive aux droits d'auteur. 

Cette loi n’a d'ailleurs pas 
résolu tous les problèmes. Il 

est toujours impossible de 
déposer un brevet concer¬ 
nant un logiciel C’est re¬ 
grettable car le brevet as¬ 
sure un maximum de protec¬ 
tion. Néanmoins cette loi 
permet de répondre à deux 


questions pratiques : qui 
sera propriétaire du logiciel 
et quels seront ses droits ? 
Les logiciels sont protégés 
par le droit d’auteur, la pro¬ 
priété est donc acquise dès 
la création de l’œuvre. Mais 
certaines règles spécifiques 
au logiciel ont été introdui¬ 
tes dans le cadre du droit 
d'auteur. C’est ainsi que 
pour déterminer la propriété 
du logiciel il faudra examiner 
la situation personnelle du 
créateur : s'agit-il d'un sala¬ 
rié ou non? En effet si vous 
êtes dingue de micro et que 
vous passez vos week-ends 
à perfectionner vos pro¬ 
grammes il n’y aura aucune 
hésitation possible. Vous 
êtes le seul propriétaire du 
logiciel en tant qu’auteur in¬ 
dividuel. Si vous êtes sala¬ 
riés d’une entreprise. De 
deux choses l’une : 

1 - Vous avez créé le logiciel 
« dans l’exercice de vos 
fonctions» il deviendra 
propriété de votre entre¬ 
prise. 

2 - Vous avez créé le logiciel 
sans que cela ne fasse par¬ 
tie des tâches qui vous in¬ 
combent (gestion de stocks, 
de paie du personnel, de 
comptabilité, etc). Les juges 
considèrent que si vous 
n'avez reçu ni aide, ni rému¬ 
nération de la part de votre 
société et que si vous n’avez 
pas utilisé le matériel de la 
société, la propriété du logi¬ 
ciel vous revient. 

Ouels vont-être les droits du 
propriétaire? La loi instaure 
un régime tout à fait déroga¬ 
toire au Droit d’Auteur clas¬ 
sique. Le point principal 
étant « l’interdiction de la re¬ 
production et de l'utilisation 
d'un logiciel sans le consen¬ 
tement de son auteur». L'ac¬ 
quéreur d’une disquette 
pourra seulement effectuer 
une copie de sauvegarde et 
non plus enregistrer comme 
bon lui semble (comme c’est 
le cas pour les disques et 


cassettes par exemple). En 
outre, un logiciel ne pourra 
plus être utilisé que dans les 
conditions prévues par la li¬ 
cence concédée. 

Sachez encore que les pro- 
piétaires de logiciel voient 
leurs droits garantis pour 
une période de vingt-cinq 
ans, que la rémunération de 
l’auteur peut être forfaitaire : 
à la différence des chan¬ 
teurs ou des écrivains payés 
en fonction du nombre 
d’exemplaires vendus, la 
cession des droits du logi¬ 
ciel peut être payable en 
une fois. Ici c'est à vous de 
définir par contrat votre 
mode de rémunération 
proportionnelle ou forfaitaire. 
Vous pouvez exiger devant 
ce même tribunal qu’il pro¬ 
cède à une saisie contrefa¬ 
çon du logiciel que l'on utili¬ 
serait sans votre accord. 


ERICSSON 
PC PORTABLE 

L’Ericsson PC portable est 
composé d’un écran, d’une 
unité centrale, d’une mé¬ 
moire secondaire, d'un cla¬ 
vier et d’une imprimante. Il 
est doté d’une unité de dis¬ 
que souple 5 pouces 1/4 et 
d’une connexion pour une 
mémoire secondaire externe 
supplémentaire. En option : 
un ergo-disk, c'est-à-dire un 
disque électronique qui per¬ 
met une efficacité accrue 
pour le traitement de l’infor¬ 
mation et un modem acous¬ 
tique. Le PC Portable 256 Ko 
de base avec une disquette 
et une imprimante intégrée 
est vendu 39 260 F ht. 


VIRGULE 
MAL PLACEE 

Cinquante à cent mille des 
Parisiens qui avaient choisi 
le prélèvement automatique 
mensuel de l'impôt sur le re¬ 




HIT BIT • MSX 2 


venu ont reçu au mois de 
janvier un échéancier pour 
1986, réduisant ce prélève¬ 
ment à 10 de son montant 
réel. L’ordinateur avait tout 
simplement déplacé la vir¬ 
gule (tout seul?). Dans un 
communiqué embarrassé 
émanant du ministère de 
l’Economie et des Finances, 
on précise qu’il s’agit d’une 
«erreur matérielle» et que 
« les contribuables concer¬ 
nés recevront dans les meil¬ 
leurs délais un avis rectifica¬ 
tif et une lettre explicative » ! 



VICTOR 
ET LE V 286 

Victor Technologies pré¬ 
sente le V 286 : un compati¬ 
ble AT construit autour d’un 
processeur 80286 d’Intel. Sa 
mémoire RAM de 512 Ko 
peut être étendue à 1 Mo par 
ajout de modules de mé¬ 
moire sur la carte mère. La 
mémoire totale est extensi¬ 
ble à 10,5 Mo. Le V 286 est 
vendu au prix de 35 900 F ht 
pour un disque dur de 20 
Mo : un prix particulièrement 
bas compte-tenu des capa¬ 
cités de la machine et de sa 
fiabilité. 
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D IVRES 

LES TÉLÉ¬ 
COMMUNICATIONS 

Gérard Robin 

Format de poche, prix ar¬ 
gent de poche, l’utile collec¬ 
tion «Que sais- je?» nous 
dévoile aujourd’hui l'anato¬ 
mie fonctionnelle des orga¬ 
nes de télécommunications. 
Quels signaux électriques et 
analogiques? Quels sup¬ 
ports pour leur transmission 
- de la fibre optique au satel¬ 
lite en passant par le câble 
sous-marin ? A travers quels 
réseaux? Pour quels usa¬ 
ges? Toutes ces questions 
y trouvent réponses préci¬ 
ses mais simples. Même les 
aspects économiques et so¬ 
ciaux ou les perspectives 
d’évolution des télécommu¬ 
nications sont abordés, bien 
que restant pour leur part au 
niveau du survol. De l’info 
sage, sans déviationnisme 
techniciste, matheux ou Fo- 
lamour. C'est agréable. 

P.U.F., 126 pages. Nov. 1985 


LES MOTS 
ESSENTIELS 

de la micro-informatique 
Jean-Pierre Lamoitier 

Qui a souffert de crypto¬ 
messages apparaissant sur 
son écran (ou dans sa revue 
micro préférée), plantant le 
lecteur défait dans une dé¬ 
sagréable impuissance? 
Même pour les anglopho¬ 
nes, les mots de l’informati¬ 
que sont d’un jargon plein 
d’images. L’intérêt de ce 
nouveau lexique, est de tenir 
compte des logiciels - de 



leurs fabricants mais aussi 
de leurs termes propres - 
notamment pour les Macin¬ 
tosh et autres intégrés 
comme GEM ou Window. 
Pour le reste, 2000 mots tra¬ 
duits et brièvement définis... 
Trouvera-t-on toujours celui 
qu’on cherche? 

Edimicro, 213 pages, 135 F. 
Décembre 1985. 


GRAPHISME 
SCIENTIFIQUE 
SUR MICRO- 
ORDINATEUR 

De la 2 e à la 3 e dimension ; 
50 applications 
résolues en Basic. 
Robert Dony 

Sans doute un must actuel 
du graphisme scientifique. 
Ce livre en est à sa troi¬ 
sième édition. Destiné à 
ceux que les maths n’ef¬ 
fraient pas, il s’appuie sur la 
description des bases ma¬ 
thématiques et des princi¬ 
pes du dessin sur ordina¬ 
teur pour en montrer très 
largement l’utilisation dans 
nombre d’applications. Trai¬ 
tant successivement des 
graphismes 1, 2 et 3D, il 
n’élude pas le problème dé¬ 
licat des parties cachées 
d’un dessin. Les program¬ 


mes - en Basic - sont con¬ 
çus pour tourner tels sur Ap¬ 
ple 2 ou Wang 2200. Ils sont 
aisément transposables à 
d’autres machines (CBM 64, 
Epson QX-10, Amstrad et ZX 
81) pour lesquelles les 
adaptations sont décrites. 
Au total, un outil pour imager 
les maths, les apprendre 
aussi bien que les ensei¬ 
gner, pour apprendre à des¬ 
siner en comprenant où l'on 
va. 



GRAPHISME 

SCIENTIFIQUE 


SUR MICRO'ORDINATEUR 
d* la 3’ à la 3*dlm«n#ton 
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R DONY 
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Masson, 256 pages, 110 F. 
Novembre 1985 

ENSEIGNER 

APPRENDRE 

AVEC 

L’ORDINATEUR 

Corinne Hermant 

L’auteur définit sa présenta¬ 
tion de l’EAO comme un 
«patchwork» de l’objet et 
de ses multiples usages. 
C’est assez juste. Et la res¬ 
ponsable de la didacthèque 
du CESTA - qui se veut aux 
didacticiels ce que le dépôt 
légal est aux publications 
écrites - sait de quoi elle 
parle. A travers une mutitude 
d’exemples, elle raconte les 
applications, les utilisateurs, 
les matériels, les moyens, 
les « ingéniéries pédagogi¬ 
ques»... Bref, tout ce qui 
«fait» l'EAO, nébuleuse 
dont bien malin qui peut pré¬ 
dire l’évolution. Mais décrire 


nse 

r/y 

&r 


nseigner 
‘ pprendre 


I w V 

RDINATEUR 


Corinne Herman! 



son état présent, c'est ici 
chose faite. 

Cedic/Nathan, 237 pages, 
89 F. Octobre 1985 


LEXIQUE 

D’INFORMATIQUE 
ET DE MICRO- 
INFORMATIQUE 

Jeanne Miisant 

Ce lexique part du français. 
Un index anglais-français 
d’environ 800 mots permet¬ 
tra la traduction. On n'y re¬ 
trouve aucune orientation 
préférentielle (langage, tech¬ 
nologie, logicielle,etc.). C'est 
un lexique «généraliste», 
assez sec destiné plutôt aux 
pros. 

Eyrolles, 175 pages. Octo¬ 
bre 1985 

■ ii ih irrrrni"^ 

LEXIBBE B'INFBIMATlm 


n 11 MICRO 




Il bd Voltaire 75011 Paris 
(M° République) Tel. (1) 43.57.48.20 



THOMSON*SINCLAIR‘ORIC*ATARI 

Moniteurs - Imprimantes - Programmes ■ Interfaces • 
Poignées de jeux • cassettes - Disquettes - listings - Rubans. 
Livres : PSI - SYBEX - M.A. - CEDIC - NATHAN - etc. 



Micro V.O n° 5 - Mars 86 


97 































































ETITES ANNONCES 


AMSTRAD 

• Vds AMSTRAD CPC 6128 + Revues 
+ Disquettes + Programmes pour rai¬ 
son financière. Tél. : (16) 69.42.18.20 
après 19 h. Demander Christian. Prix : 
5 500 F. Acheté le 3 oct. 85. Garantie. 

• Urgent, vends cause double emploi, 
CPC 464 Monochrome + Imprimante 
DMP1 (avec câble et papier) + L. dis¬ 
quette (ss garantie), le tout en très 
bon état : 6 400 F (+ nombreux pro¬ 
grammes gratuits). Paiement en 3 ou 4 
fois possible. Écrire à : M. Philippe Bi¬ 
got, 15, allée des Acacias, 45450 Fay- 
aux-Loges. 

APPLE 

• Vends Apple 3 avec imprimante et 
nombreux logiciels. Acheté en octo¬ 
bre 84 Prix : 20 000 F H T. Tél. : (1) 
69.28.10.04 Martine Maunet ou Domini 
que Parnaud. Heures de bureaux : 
30.41.45.10 

• Vends Apple 2e nov. 83 + 2 drives 
+ imprimante Seikosha GP80 + carte 
parallèle + chat mauve + program 
mateur d'éprom + livres, revues et 
programmes. Le tout : 12 000 F. Cor¬ 
net, 50, rue de la Renardière, 93100 
Montreuil. 

• Vds Apple 2+ (1-84) + 16 Ko + 
monit. vert + 2 drives + contrôleur + 
joystick + logs : 8 000 F. Modem Ap¬ 
ple Sectrad neuf : 1 800 F. Fabrice 
Gousselot, 18, allée W. Penn. 92150 
Suresnes. Tél. : 1/47.72.28.65 (19 h). 

• Vends Apple III + moniteur III, pro¬ 
grammes correspondants. (Visicalc, 
Business graphie, PFS, Emulation Ap¬ 
ple II), très bon état, très peu utilisé, 

15 000 F ou échange contre Machin- 
tosh. Tél. : 45.24.26.51. (Paris). 

ATARI 

• Vends pour Atari (800-800 XL) drive 
+ chip incorporé. Prix : 3 000 F. De¬ 
mander : Sylvain au 42.00.97.38 

• Affaire ! Vends super ordinateur 
Atari 800 XL + moniteur monochrome 
vert + magnétophone Atari 1010 + 
jeux en K7 : Solo Flight, Spitfirebace, 
Fort Apocalypse, Pôle position, Dé¬ 
cathlon, Bruce lee + manettes : 2 de 
type Coleco, 1 hippojoystick + un 
adaptateur PAL/SECAM. Le tout sous 
garantie : 2 200 F A débattre. Je 
donne un ordinateur de jeu à tout 
acheteur Tél. : 43.05.20.26 tlj à partir 
de 16 h 30. 

• Vends 800 XL + lecteur K7 + nom¬ 
breux best-sellers en cartouche + li¬ 
vres + 3 K7 initiation : 1 700 F. Lecteur 
de disq. + Flight Simulator II : 2 000 F 
(s'adresser à lann Ricquebourg Ros- 
pernès — Quimperlé, 29130 Rédené. 
98.96.22.35). 

• Vends lecteur de disquettes Atari + 
logiciels de jeux : Flight Simulator II, 
Archon II, Sevencity of Gold, Summer 
Games, Dark Crystal, Dallas Quest, Di¬ 
mension X, Tabcount. Prix : 1 500 F. 
Tél. : (16) 93.87.74.88. 

• Vends Atari 800 XL + drive + nom¬ 
breux logiciels. Année 1985. Frédéric. 
Tél. : 29.82.40.47. 

COMMODORE 

• A vendre : Commodore 64 + lect. 
K7 + nbr. jeux et utilit. + joystick : 
2 100 F. Tél. : (1) 64.02.29.14. 

• CBM 64 + monit. vert + lec. K7 + 
joystick + 50 logiciels (gest, jx, utilit) 
+ garantie + doc. Valeur 6 300 F : 
vendu 4 000 F. Tél : jl) 42.22.58.47. 

• Vends CBM 64 (Péritel) garantie 
mars 86 + 1531 + 160 jx : 4 000 F. 
Laurent, tél. : 39.59.61.37. 

• Vds CMB64 + lect. K7 + progrs + 
4 livres + Tool 64. Prix : 2 600 F. Tél. : 

16 1.64 21.26.38 


• Vds Vie 20 bon état + lecteur de 
cassette + autoformation (1 livre + 
cassettes) + livres de programmes + 
cassettes de bons jeux. Prix : 1 000 F à 
débattre. M. Bailly Charles-André 38, 
rue de l'Église, 57144 Luttange. - 

• Vends Vie 20 Secam + prise péritel 
+ extension 8 Ko + 30 K7 + lecteur 
K7 + 1 manette de jeux, le tout 

1 200 F à débattre Stéphane Renault, 
61, rue des Mallets, 95150 Taverny. 
Tél. : 39.95.00 11 

MSX 

• Vds Canon V20 MSX 64 Ko + lec¬ 
teur 2.8” + 10 disquettes + cart. jeu 
+ joyst. + livres + cordons état par¬ 
fait : 3 750 F. H. Jensen (1) 60.75.58.00. 

• Vds MSX Yamaha YIS-503 F + syn 
thétiseur de son FM SFK-01 + câbles. 
3 000 F. F Blareau Tél. : 34.86.55.08 

• Vends Yamaha MSX 64 Ko + drive 
Sony 500 K + imprimante thermo-gra¬ 
phique canon + moniteur couleur 
Océanie + lecteur K7 + manettes + 
jeux + Prgms + livres + revues : 
10 000 F port inclus Tél 74.22.23 14 

• Vends Yamaha MSX + synthé. 48 
instruments + clavier mus. Van Helle 
putte P 91 Orsay Tél. : (1) 64 49.20 00 
Poste 4065 (HB) ou (1) 64.46.61.82. Prix 
à déb. 

• Vends MSX Canon (4 mois) + câ¬ 
bles + logiciels : Sorcery, Mandra¬ 
gore, Yiankung Fu, Hyper Holympic, 
Ghost Buster, Pit Fall II, Champ (ASM). 
Prix : 1 200 F. Tél. : 93 87 74 88 

• VDS MSX Yashica YC-64 64 Ko + 
magnéto Philips D6600/30P garantie 
10 mois. L'ensemble : 1 850 F. Tél. 
43.05.42.81. Le soir avant 21 h. 

• Vends Canon V20 MSX, + joystick 
+ nombreux programmes (Mandra 
gore, Sorcery, The Hobbit, Zaxxon, 
etc ), 2 000 F. Philippe Besnard, 15, rue 
Mélingue, 75019 Paris. (42.02.41 60) 

• Vends Sanyo MSX PHC 28 S 16 Ko 
+ ext 64 Ko + imprimante Philips 
80 colonnes MSX + jeux + livres. 
Sous garantie. 4 800 F le tout. M La 
toulie. B.P. 74. 83110 Sanary. Tél. 
9474.22.73. 

ORIC 

• Vds Oric Atmos + lecteur de dis¬ 
quettes Jasmin + moniteur Zénith 
vert + 3 K7 de jeux + 3 disquettes + 
revues + livres (chaque article et en 
version complète). Prix : 3 000 F. Après 
18 h, Guillaume au 45.69.83.01. 

• Cherche pour fonder club ordina¬ 
teur, Oric 1 ou Atmos (16/48K), bas 
prix ou hors service ainsi que revues, 
livres et logiciels Maïkoouva Gérald. 
Reneuille voie N° 99, avenue G, 97200 
Fort de-France, Martinique. 

• Vends cassette de Logo pour Oric 1 
et Atmos, neuve (11/85) : 200 F. + une 
cassette de jeu surprise et quelques 
programmes divers. Tél. : 57.69.84.53. 

• Vds Oric-Atmos + Péritel + câbles 
+ magnéto + nbx prog sur cass et 
listings + manuel + livres. Le tout : 

2 000 F Bassié Ludo, 06000 Nice 
Tél. : (16) 93.97.28.31. Heures repas et 
après 18 h. 

• Vends Oric Atmos péritel complet. 
État neuf + 32 jeux + journaux + li¬ 
vre. Prix : 1 300 F. Olivier Caylus, 7, Bd 
de l'Orangerie, 95160 Montmorency. 
Tél. : 39 64.15.57. 

• Vends Oric-1 48 Ko avec alim. + 
cordons, programmes, livres, 600 F ou 
650 F avec prise péritel. 
Tél 42 86 89 43 

• Vends Atmos 48 Ko + cordons péri¬ 
tel et magnéto + 16 logiciels ( Aigle 
d'or. Saga, etc.) + 1 livre Le tout 

2 000 F, à débattre. Tél. : 69 20.38.32. 
Demander Stéphane. 

SINCLAIR 

• Stop, vends ZX spectrum 48 Ko + 
interface N/B + câbles + magnéto + 
logiciels dont : Gremlins, the hobbit, 
Skooldaze, Cauldron, Macadam Bum- 
per, the Way of the exploding first, 
Vox, Pyzamarama. Ghostbusters, atic- 
atac. Décathlon, etc. En tout 60 jeux + 
1 joystick et l'interface. Le tout pour 
1 800 F. État neuf. Demander David : 
Tél. : 48.91.68,10 (Pantin) : 

• Vends ZX Spectrum 48 Ko, péritel 
+ magnéto + interface manette de 
jeux + 1 manette de jeux + 1 clavier 


mécanique + 40 jeux + doc. Le tout 
en très bon état. 4 000 F à débattre. 
Emmanuel Kiof, 23, rue de Boissy, 
95320 St-Leu-la-Forêt. Tél. : 39.95.06.64. 

• Affaire ! Vends ZX spectrum + 
10 K7 et péritel 2 000 F. 
Tél. : 45.39.75.68 le soir après 7 heures. 
Salut. 

• Vds ZX81 (12/84) + clav. ABS + 
16 Ko + alimentation + câbles + 

3 K7 + manuel + livres + manettes. 
TBE : 800 F. Jean Jerome, tél. 
(66) 83.60.43, AP. 19 H. 

• Affaire extra ! Vends ZX spectrum 
+ 48 Ko péritel + lecteur de cassettes 
+ manuel d'utilisation + interface 
Kempston joysticks + 2 joysticks + 
13 logiciels dont : Raid over Moscou, 
Lords of Midnight, Flight simulation, 
Hunchback II, Rocky, Jetpac, Chess... 
Valeur réelle 3 630 F, vendu 2 700 F. 
Ramanantsoa Nathalie, 34 bis, rue 
d'Aubervilliers, 75019 Paris. 
Tél. : 42.05.11.11. 

THOMSON 

• Vends T07 + clavier mécanique + 
Basic + 16 K + lecteur K7 + nom¬ 
breux programmes. Prix exceptionnel : 
2 000 F. A. Bertrand. Le Trianon - 
38300 Bourgoin-Jallieu. Tél. 
(16) 74.93.26.96. 

• Urgent : Vends T07 + Basic + 
16 Ko + Logo + Crypyo + manette 
jeux son + budget + nombreux livres 
initiation et assembleur 6809 : le soir 
après 17 h. Prix 6 000 F à débattre. 

• Vends TO7/70, lecteur K7, Basic, 
Megabus (ext. musique et jeux), livre 
assembleur 6809E, logiciels. A partir 
de 20 h 00. 

• Vends T07 + Basic + ext. mémoire 
16 Ko + LEP (magnéto) + manuel. 
Valeur 4 475 F. Prix : 3 000 F. Deman¬ 
der Franck Rogé - Tél. : 64.02.29.74 
après 19 h 00. 

• Vends T07 + 16 Ko + Basic + ma¬ 
nettes + Adapt. PAL-SECAM + ma¬ 
gnéto + jeux FBI, Anoroïdes divers). 
Année 84. Valeur 6 620 F. Vendu 

4 000 F, port compris. Olliet T., 8, allée 
Claude Bernard - 01200 Bellegarde. 
Tél : 50.48.11.64 Urgent 

• Vends Thomson M05, avec lecteur- 
enregistreur de cassettes, cartouche 
Pictor, crayon optique, 3 cassettes 
jeux (l'Empire, l'Aigle d'or, Meutre à 
grande vitesse), 4 cassettes initiation 
Basic. L'ensemble : 2 500 F. 
Tél. : 42.22.81.87 (avant 10 h ma¬ 
tin / après 20 h). 

• Thomson T09 vends logiciels gra¬ 
phiques et statistique avec disq. 31/2 
+ livres + valise' FIL pour 350 F le 
tout neuf. Écrire ou tél. à Wajchen- 
berg. R, 22, av. Jean Sibelius - 1070 
Bruxelles. Tél. : 32 2 521.39.24 aux heu 
res de bureaux. 

TI99 

• Vends : Tl 99 (12/83) + Basic éten¬ 
du + boîtier Periph + manettes Texas 
+ Joysticks Atari + Centronics + 
GP50A (12/84) + 32 Ko + nombreux 
modules + livres + divers. Prix : 
4 000 F M. Sarrobert au 50.71.71.00 
Poste 470 (aux heures de bureau). 

• Vends Tl 99 + Péritel + ext. Basic 
+ Magnéto avec cordon + Joysticks 
+ Module jeu star trek + K7 « Basic 
par soi-même + jeux sur K7. Le tout 
1 500 F. Thierry Maurel, 81 av. des 
Goumiers — 13008 Marseille. Tél. 
91.73.12.40. 

• SUPER AFFAIRE ! vends pour 
Tl 99/4A, mini-memory (assembleur) 
+ manuel en français au prix ridicule 
de 300 F (neuf = 900 F). Sébastien San- 
terre, 28* avenue de la Vallée-des- 
Baux, 13520 Maussane. 

• Vends Tl 99/4A péritel + Alim. + 
Basic étendu (Man. Français) + Ma¬ 
gnéto et câbles + 2 joysticks + cas¬ 
settes et manuels (Basic par soi-même 
+ 2 tech. de progs de jeux + jeux) + 
jeu cass. solar System + livres et 
progrs. Le tout en bon état + embal¬ 
lages. Prix : 2 300 F ou 1 800 F sans B.E. 
Tél : 77 35.44.56. 

YENO 

• Vends Sega Yeno Sc 30900 H + 
manette + congo bongo + star jacke 
+ tennis + columbia + télécran. Va¬ 


leur : 3 300 F. Vendu : 1 500 F. - 
Alexandre Audoynaud, 18 cours Fr. 
Roosevelt - 69006 Lyon. Tél. 
78.24.71.52. 

• Vends : ordinateur Yéno Sega Sc 
3000 16Ko. Prix Péritel + magnéto + 
cordon + manette + 2 cassettes de 
jeux + livre de programme + pro¬ 
gramme. Vends 2 000 F. Excellent état. 
Tél. : 34.19.50.92. Demander Jean-Sé¬ 
bastien. 

DIVERS 

• Radio-amateur (SWL) possédant 
Oric-Atmos, n'arrive pas à résoudre 
les problèmes de parasites et ronfle¬ 
ments créés par l'ordinateur lorsque 
celui-ci fonctionne avec les récepteurs 
(Programme RTTY) : Toutes solutions 
seront les bienvenues. Michel Midy, 
Le Clos des Vignes, 14, allée Réaumur, 
95150 Taverny. 

• Achète K7 console CBS, Beck Da¬ 
vid. Tél. : 29.55.03.15 (St Dié). 

• Très urgent : Hector 2HR + et HRX 
recherchent correspondants(es) ayant 
importante Ludothèque surtout bien 
fournie en jeux HR pour 2HR + et 
HRX. (Je possède plus de 30 jeux BR 
et HR : Chenille, Jeep-Lunaire, 
Stramlk etc.). Ecrire en envoyant votre 
liste de jeux à : C. Berny, 1, rue du 
Pertuis d'Antioche, 17137 L'Houmeau. 

• A vendre accélérateur 1541 CBM à 
multiples fonctions : 500 F. Pour tout 
remseignement : M. Martell, 4, rue du 
lycée, 78190 Trappes. Tél. : 30.62.80.36. 

• Vends console de jeux Atari avec 
2 joy + 5 K7 le tout : 500 F. Tél. : (1) 
47.22.02.43. 

• Vds cause fin d'étude calculateur 
scientifique Hewlett-Packard HP-15C 
(9/84). Prix : 1 000 F. Tél. : 21.97.67.07. 
Après 20 h. 

• Vds portable Epson HX20 complet : 
Ecran, Mini-Imprimante, Micro K7, Va¬ 
lise, Chargeur, Nbreux Logiciels, Ma 
nuels. 4 800 F. M. Otmane Telba. Tél. : 
(1) 39.02.29.05. 

• Etudiant pas très riche cherche 

Ecran couleur (Télé ou autre) en bon 
état de marche (hte résolution si pos¬ 
sible) pour moins de 700 F et/ou Im¬ 
primante MT 80, MT80+ ou 

STAR SG10 (ou similaires) pour moins 
de 1 200 F. Merci d'avance. Alexis. 
Tél. : (16-1) 46.33.14.14. 

• Vends : SORD Type M 23. 
Disque dur SORD HD 110. Ja¬ 
mais servi, 10 millions carac¬ 
tères. Prix neuf : 40 000 F, 
vendu 17 000 F. Contacter : 
Ch. Fenaux. Tél. : 42.56.72.72, 
poste 1671. 

« Vds VG 500 24 Ko Rom, 18 Ko Rom + 
poignées + magnéto + 3 cassettes de 
jeux + 1 cassette Basic + livres de 100 
pgmmes. Très bon état. Prix : 2 500 F. 
(Prix neuf : 3 800 F). Tél. : 78-59-67-04. 
Melon Antoine, (vers 18 h 30-19 h 30), 
chemin du Findez, 69320 Francheville. 
(Lyon). 

• Atari 520 ST cherche contact pour 
échange d'idée, de trucs et d'astuce. 
Roulie J.-Claude, 131, rue des bas, 
92600 Asnières, 47-99-22-60, le week¬ 
end de préférence. 

• Chantilly : cours 1 er et 2 e niveau, club 
nombreuses activités sur matériel CBM 
64, TRS 80, Vie 20, MSX... Pour tous ren¬ 
seignements : Ch. Bailly-Grandvaux, 58, 
rue Robert Schumann, 60100 Creil : 
Tél. : (16) 44-25-11 -78 le soir après 20 h. 

• Recherche correspondantes sur 
commodore 64 en disks. Je possède 
plus de 500 programmes. M. Wermelin- 
ger Serge, 34, rue de Dunkerque, 68200 
Mulhouse. Tél. : 89-53-75-43. 

• Possesseur « Oric atmos » recherche 
correspondants pour échange de jeux 
(environ 75 jeux, Hobbit, Harrier Maca¬ 
dam Bumper, le diament de l'île mau¬ 
dite,...) + utilitaires, contacter le (16) 
98-44-57-89. 

• Cherche sponsor pour création d'un 
serveur accessible par minitel ; pas 
sérieux s'abstenir. M. Thibault Eric, 
Montée de Tireluc, Maubec, 38300 
Bourgoin-Jallien. 
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HEUREUX ÉVÉNEMENT 
CHEZ LES COMPATIBLES. 

A peine né, il crée l'événement. 

Un simple coup d’œil sur sa généa¬ 
logie en dit plus que tous les éloges 
officiels. 

If descend en droite ligne des 
Epson OX 10 et QX 16 ; deux micro¬ 
ordinateurs dont les mérites sont 


reconnus sous toutes les latitudes. 
Côté maternel, il hérite d'une supré¬ 
matie mondiale: celle de la grande 
famille des imprimantes Epson. 

Il y a aussi la branchedes portables, 
une dynastie fondée en 1982 par 
l'Epson HX 20, qui règne aujourd'hui 
aux côtés du PX 8. 

Enfin, il hérite de toute l'expé¬ 
rience de la famille nombreuse des 
compatibles, ses cousins. Ils lui ont 


montré l'exemple et, grâce à son 
noble héritage, il a su les dépasser. 
Quel autre compatible PC pourrait 
\e\end\cyaex une filiation. aussi 
prestigieuse? 

Sans rire, essayez donc de citer un 
nom ! 

Technology Resources S.A. 
Levallois-Perret, Tél. (I) 47 57 31 33. 
Lyon, Tél. 72 3314 14 - Toulouse, 
Tél. 6122 9141. 


L* Heritier est né! 





EPSON 


LA ROUTE INFORMATIQUE 
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PLUS RIEN NE SERA 
COMME AVANT 
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« 2912. La guerre menace la Terre. Sur toutes les colonies spatiales, c’est l’angoisse : si l’ordinateur central de contrôle galacti- 
st détruit, toute vie s’éteindra sur les planètes non autonome^. Pour Crafton, androïde spécialiste des missions dangereuses, et 
XUNK, son fidèle podocéphale, il s’agit d’investir le centre de recherche qui garde l’ordinateur et d’éviter la catastrophe. 

La richesse du jeu (énigmes à résoudre, objets à découvrir, adversaires multiples et inattendus), la qualité graphique et l'exception¬ 
nelle rapidité de l’animation en 3 D vous feront passer de fabuleux moments. 




4 heures du matin. Il fait encore sombre dans la 
cellule. Derrière la porte, la liberté ou la mort. Dernier sur¬ 
vivant de l’humanité vaincue par les robots, vous êtes 
enfermé pour toujours au plus profond d'un effroyable 
pénitencier. Pour vous, un seul objectif : rejoindre la 
femme qui. paraît-il, serait elle aussi emprisonnée, et fuir 


ensemble. Réussirez-vous ? 

Exceptionnel jeu d'aventure et d'arcade entièrement animé 
en 3 Dimensions. 






Quelque part sur la terre, un nouveau virus frappe 
les populations. Haut responsable de la santé mondiale, 
vous devez enrayer l’épidémie par des mesures adéquates : 
cordon sanitaire, information, mise au point d'un anti-virus. 
Dans votre centre de recherche, vous disposez d'un 
tableau de contrôle planétaire qui vous met en relation 
avec les pays atteints, d'un ordinateur pour guider vos 
décisions, et d'un microscope.pour des séances d'arcades 
au cours desquelles vous lutterez contre le virus. 
Parviendrez-vous à endiguer le fléau et à sauver l'huma¬ 
nité ? 


LOGICIELS POUR AMSTRAD EN VENTE PARTOUT 


Cassette ou Disquette 


27 rue de Léningrad 75008 Pans 43.87.27.27 ERE INFORMATIQUE 
Télex EREINFO 650134F UNE ERE D’AVANCE 


































